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REM ! 


IDENTIFICATION 


PRODUCT CODE: AC-8452C-MC 
PRODUCT NAME: CZDHCCO DH1il TRANSMITTER/RECEIVER LOGIC TEST 


DATE: JUNE 1985 
MAINTAINER : NAC SOFTWARE ENGINEERING 
AUTHOR : MICHAEL DAVIS 


THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT 
NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL 
EQUIPMENT CORPORATION. DIGITAL EQUIPMENT CORPORATION ASSUMES 
— FOR ANY ERRORS THAT MAY APPEAR IN THIS 


NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF SOFTWARE ON 
ow tel THAT IS NOT SUPPLIED BY DIGITAL OR ITS AFFILIATED 


COPYRIGHT (C) 1985 BY DIGITAL EQUIPMENT CORPORATION 


SEQ 1 
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1. ABSTRACT 


THE DH11 TRANSMITTER AND RECEIVER LOGIC TEST CHECKS 

THE BASIC TRANSMITTER AND RECEIVER FUNCTIONS. 

FUNCTIONS TESTED INCLUDE INTERRUPTS, OPERATION OF 
TRANSMITTER NPR LOGIC, AND OPERATION OF RECEIVER SILO LOGIC. 


SEQ 2 








[--~- 


SEQ 3 
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1 
2 REQUIREMENTS 
: 2.1 EQUIPMENT 
6 PDOP-11 FAMILY STANDARD COMPUTER WITH 4KW OF MEMORY 
7 ASR-33 TELETYPE OR EQUIVALENT 
8 DH11 ASYNCHRONOUS MULTIPLEXER 
9 DMii MAINTENANCE CARD INSTALLED 
10 
il 2.2 STORAGE 
12 
13 THE PROGRAM LOADS INTO 4KW OF MEMORY 
14 
15 3. LOADING PROCEDURE 
16 
17 THE STANDART PROCEDURE FOR LOADING ABSOLUTE BINARY TAPES 
18 IS 10 BE USED 
19 
20 4. STARTING PROCEDURE 
21 
22 4.1 CONTROL SWITCH SETTINGS 
23 
24 4.1.1 AFTER PROGRAM LOAD CINITIAL PROGRAM START) 
25 
26 ALL CONSOLE SWITCHES DOWN 
27 
28 4.1.2 TO MODIFY DEVICE VECTOR AND CONTROL REGISTER ADDRESSES 
29 AFTER PROGRAM RESTART 
30 
32 fe 
33 4.1.3 TO START PROGRAM AT SELECTED TEST AFTER PROGRAM RESTART 
34 
= SWO1=1 
37 4.2 STARTING ADDRESS 
38 
39 THE STARTING ADDRESS FOR ALL TESTS IS 000200 
40 3 
41 THE RESTART ADDRESS FOR ALL TESTS I 00C2000 
42 
43 THE STARTING ADDRESS TO ENTER A SELECTED TEST IS 000200 
44 
45 4.3 PROGRAM AND/OR OPERATOR ACTION 
45 
47 4.3.1 INITIAL PROGRAM START 
48 
49 4.3.1.1 LOAD PROGRAM INTO MEMORY 
50 4.3.1.2 LOAD ADDRESS 000200 
S1 4.3.1.3 CLEAR CONSOLE SWITCHES 
32 4.3.1.4 PRESS START 
53 4.3.1.5 THE PROGRAM WILL TYPE "DH1i1 XXXX 
54 AND WILL THEN TYPE “VECTOR ADDRESS-” AND WAIT FOR AN 
55 INPUT FROM THE TELETYPE KEYBOARD. 
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4.3 (CONT‘D) 


4.3.1.6 


NOTE: 


4.3.1.7 


4.3.1.8 


4.3.1.9 


mm 
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TYPE IN THE ADDRESS OF THE RECEIVER INTERRUPT VECTOR 
FOR THE DHi1 TO BE TESTED FOLLOWED BY <CARRIAGE RETURN> 


WORDS IN ANGLE BRACKETS, I.E. <CARRIAGE RETURN> MEAN THAT 
THE TELETYPE KEY WITH THE NAMED FUNCTION SHOULD BE STRUCK 


IF AN INCORRECT ADDRESS IS ENTERED, THE PROGRAM 

WILL TYPE “?” AND WILL REPEAT THE SECOND MESSAGE OF 4.3.1.5 
THE PROGRAM WILL TYPE "CONTROL REGISTER ADDRESS-”“ 

AND WAIT FOR AN INPUT FROM THE TELETYPE KEYBOARD 


TYPE IN THE ADDRESS OF THE SYSTEM CONTROL REGISTER OF THE 
DH1ii TO BE TESTED FOLLOWED BY <CARRIAGE RETURN> 


IF AN INCORRECT ADDRESS IS TYPED, THE PROGRAM WILL TYPE 
“?" AND WILL THEN REPEAT THE MESSAGE OF 4.3.1.7 

THE PROGRAM WILL TYPE “R” TO INDICATE THAT IT IS 

ABOUT TO START TESTING, AND THEN TESTING WILL BEGIN 


PROGRAM RESTART WITH ALL SWITCHES DOWN 


PERFORM 4.3.1.2 TO 4.3.1.5 
THE PROGRAM WILL TYPE “DH11 XXXx 
AND WILL THEN CONTINUE AS DESCRIBED IN 4.3.1.9 


PROGRAM RESTART WITH SWOO=1 


LOAD ADDRESS 000200 

SET SWO1=1 

PRESS START 

THE PROGRAM WILL PERFORM AS DESCRIBED IN 4.3.1.5 TO 4.3.1.9 


PROGRAM RESTART WITH SWO1=1 


LOAD ADDRESS 000200 

SET SWOi=i 

PRESS START 

THE PROGRAM WILL TYPE “DH11 XXXX 

AND WILL THEN TYPE “TEST PC-" AND WILL WAIT FOR AN INPUT 
FROM THE TELETYPE KEYBOARD 

TYPE IN THE ADDRESS OF THE TEST AT WHICH THE PROGRAM IS TO 
BE STARTED FOLLOWED BY <CARRIAGE RETURN> 

THE PROGRAM WILL TYPE R TO INDICATE THAT IT HAS STARTED 
AND WILL START TESTING AT THE SELECTED TEST. 


CARE MUST BE TAKEN WHEN THS FEATURE IS USED, SINCE 
THERE IS NO PROTECTION AGAINST SELECTING AN ADDRESS THAT 
IS IN THE MIDOLE OF A TEST 


IF IT IS DESIRED TO LOOP ON THE TEST THAT IS SELECTED 
SET SWi4=1 BEFORE ENTERING THE TEST ADDRESS 
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5.2 
5.2.1 


5.2.2 


5.2.3 





OPERATING PROCEDURE 
OPERATIONAL SWITCH SETTINGS 


SW1i5=1, HALT ON ERROR 

SWi4=1, LOOP ON CURRENT TEST 

SW1i3=1, SUPPRESS ERROR TYPEOUT 

SWii=1, INHIBIT ITERATIONS 

SW10=1, ESCAPE TO NEXT TEST ON ERROR 

SWO9=1, FREEZE VARIABLE PARAMETER IN CURRENT TEST 
SWO1=1, START PROGRAM AT SELECTED TEST 

SWOO=1, CHANGE PARAMETERS AT PROGRAM RESTART 


SUBROUTINE ABSTRACTS 
TRAPCATCHER (LOCATIONS 000000-000776 ) 


THIS ROUTINE IS USED TO INTERCEPT UNEXPECTED INTERRUPTS 
AND TRAPS. THE AREA FROM 000000-000776 IS LOADED 
WITH THE FOLLOWING SEQUENCE 


772 


2 
0 
4 
0 
7 
0 
776 
0 


WHICH THE PROGRAM TRAPPED. THE PROCESSOR STACK MAY 
BE EXAMINED TO DETERMINE WHERE THE PROGRAM WAS WHEN THE 
TRAP OR INTERRUPT OCCURED. 


START (PROGRAM INITIALIZATION) 


THIS ROUTINE INITIALIZES ALL PROGRAM FLAGS AND COUNTERS, 
TYPES THE PROGRAM TITLE MESSAGE, AND INPUTS THE VECTOR 
AND CONTROL REGISTER ADDRESSES OF THE DH11 TO BE TESTED. 


BEGIN (PROGRAM START AND RESTART) 


THIS ROUTINE * ENTERED IMMEDIATLY AFTER “START“ 
AND EACH TIME A PROGRAM PASS HAS BEEN COMPLETED. 

THE ROUTINE SETS UP THE PROCESSOR STACK AND STATUS WORD 
AND THEN TRANSFERS CONTROL TO THE TEST AT WHICH 

TESTING WILL BEGIN. IF SWO1=0 WHEN THIS ROUTINE IS ENTERD 
TESTING WILL START AT Ti (TEST 1). IF SWO1=1 WHEN 

THIS ROUTINE IS ENTERED, TESTING WILL START AT THE PC 
ENTERED FROM THE TELETYPE KEYBOARD. 


SEQ 5 








— 
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5.2.4 


5.2.5 


5.2.6 





EOP CEND OF PASS) 


THIS ROUTINE IS ENTERED ONCE PER PASS AFTER ALL TESTS 
HAVE BEEN COMPLETED. THIS ROUTINE TYPES THE MAINDEC 
IDENTIFICATION CODE OF THE PROGRAM, CLEARS ERROR FLAGS 
AND UPDATES THE PASS COUNT. IF THE PROGRAM WAS LOADED 
UNDER ACT11 OR DDP, THE ROUTINE CHECKS FOR RETURN TO 
THE ACT11 OR DDP MONITOR. IF THE PROGRAM IS NOT UNDER 
MONITOR CONTROL, THE ROUTINE TRANSFERS TO BEGIN. 


SCOPER (SCOPE LOOP AND ITERATION HANDLER) 


THIS ROUTINE IS ENTERED EACH TIME A TEST IS COMPLETED. 

THE ROUTINE CHECKS FOR THE FOLLOWING UPON ENTRY 

A) IF SWi0=1, THE ROUTINE WILL TRANSFER TO THE NEXT TEST 
IN SEQUENCE, AFTER CLEARING ERROR FLAGS. 

B) IF SWil=1, THE ROUTINE WILL TRANSFER TO THE NEXT TEST 
SEQUENCE, AFTER CLEARING ERROR FLAGS. 

C) IF SWi4=1, THE ROUTINE WILL LOOP ON THE CURRENT TEST 
REGARDLESS OF THE ITERATION COUNT. 


IF NONE OF THE ABOVE IS TRUE, THE ROUTINE WILL ADD 1 

TO THE COUNT OF TEST ITERATIONS, AND COMPARE THIS VALUE 
TO THE NUMBER OF ITERATIONS THAT SHOULD BE PERFORMED. 

IF THESE NUMBERS ARE EQUAL, THE ROUTINE WILL TRANSFER 
TO THE NEXT TEST IN SEQUENCE. THE THE NUMBERS ARE NOT 
EQUAL, THE TEST CURRENTLY IN PROGRESS WILL BE REPEATED. 


SCOP1R (FREEZE ON CURRENT DATA) 


THE CALL TO THIS ROUTINE FOLLOWS IMMEDIATLY AFTER THE 

THE CALL TO THE ERROR HANDLER IN THOSE TESTS THAT HAVE 
VARIABLE PARAMETERS. THIS ROUTINE IS ALWAYS ENTERED IN 
THOSE TESTS, WHETHER OR NOT AN ERROR OCCURS. 

IF SWO9=1, THE ROUTINE WILL TRANSFER CONTROL BACK IO THE 
TEST AT A POINT WHICH WILL ALLOW REPEATING THE FUNCTION 
UNDER TEST CONTINUOUSLY WITH THE SAME DATA. IF THIS 
OPTION IS SELECTED, THE ROUTINE “SCOPER” IS NEVER ENTERED 
AND ITERATION COUNTS WILL NOT BE UPDATED. 





SEQ 6 




















SEQ 7 
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i 
: 5.2.7 ERRORS (CERROR HANDLER) 
4 THIS ROUTINE IS ENTERED UPON ERROR DETECTION ONLY. 
5 WITH ALL CONSOLE SWITCHES DOWN, THE ROUTINE PROCEDES AS FOLLOWS: 
6 A) THE PC OF THE INSTRUCTION THAT CALLED THE ERROR HANDLER 
7 IS ACCESSED THRU THE STACK, AND THEN THE EMT INSTRUCTION 
8 ITSELF IS FETCHED. THE 8 LSB OF THE EMT 
9 INSTRUCTION ARE THE ERROR CODE. THIS CODE IS 
10 USED TO ACCESS A TABLE OF ERROR MESSAGES AND ERROR 
11 DATA STORAGE LOCATIONS. 
12 8) IF THE TEST THAT FAILED DID NOT FAIL PREVIOUSLY 
13 DURING THIS PASS, A COMPLETE ERROR REPORT IS MADE 
14 IF THE TEST THAT FAILED FAILED MOR THAT ONCE DURING 
15 THE CURRENT PASS, ONLY THE DATA RELATING TO THE FAILUER 
16 IS TYPED. IF SWi3=1, NO ERROR TYPEOUT IS MADE. 
17 C) THE ROUTINE NOW CHECKS FOR HALT ON ERROR. IF SwWiS=1 
18 THE PROGRAM WILL HALT WITH THE PC OF THE CALL TO 
19 THE ERROR ROUTINE IN RO. IF SW1i5=0, THE PROGRAM WILL 
20 NOT HALT, BUT WILL CHECK FOR ESCAPE TO NEXT TEST. 
21 D) IF SW10=0, THE ROUTINE WILL RETURN 
22 TO THE TEST IN PROGRESS. IF SWi0=1, THE ROUTINE WILL 
23 ABORT THE CURRENT TEST, AND TRANSFER TO THE NEXT 
m4 TEST IN SEQUENCE, THRU THE ROUTINE “SCOPER”. 
2 
= 5.2.8 TRPSRV CTRAP DECODE AND DISPATCH) 
* 
26 THIS ROUTINE DECODES THE 8 LSB OF THE TRAP INSTRUCTION 
29 THAT CAUSED TH PROGRAM INTERRUPT, AND TRANSFERS CONTROL 
30 TO THE ROUTINE THRU THE TABLE “TRPTAB” USING THE 8 LSB 
31 OF THE TRAP INSTRUCTION AS AN OFFSET TO THE POINTER TO 
32 THE ROUTINE TO BE ENTERED. 
33 


-— 
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SEQ 8 
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5.3 


5.3.3.3 


5.3.4 


35.3.5 


5.3.6 


5.3.7 





PROGRAM AND OR OPERATOR ACTION 
PROGRAM START WITH ALL SWITCHES DOWN 


REFER TO SECTIONS 4.3.1 AND 4.3.2 FOR INITIAL PROGRAM 
BEHAVIOR. 


AFTER “R” HAS BEEN TYPED BY THE PROGRAM, TEST EXECUTION 
WILL BEGIN. EACH TEST WILL BE REPEATED A SELECTED NUMBER 
OF ITERATIONS (SEE LISTING FOR EXACT NUMBER FOR EACH TEST) 
AND THEN THE PROGRAM WILL PROCEED TO THE NEXT TEST. 

WHEN ALL ITERATIONS HAVE BEEN COMPLETED, THE PROGRAM 

WILL TYPE “CZDHC-C” AND THEN RESTART TESTING AT TEST 1 
(LOCATION Ti IN THE PROGRAM). 


IF AN ERROR OCCURS, THE PROGRAM WILL TYPE AN APPROPRIATE 
ERROR MESSAGE, AND THEN CONTINUE THE TEST IN PROGRESS. 


PROGRAM START WITH SWOO=1 

THE PROGRAM WILL PERFORM AS DESCRIBED IN 4.3.1 AND 5.3.1 
PROGRAM START WITH SWO1=1 

REFER TO SECTION 4.3.4 FOR INITIAL PROGRAM BEHAVIOR 


TEST EXECUTION WILL START AT THE ADDRESS SPECIFIED 
AND WILL CONTINUE AS DESCRIBED IN 5.3.1.2 


AFTER “CZDHC-C” HAS BEEN TYPEC, THE PROGRAM WILL 
RESUME TESTING AT TEST 1 


PROGRAM OPERATION WITH SWiS=1 

SAME AS 5.3.1, EXCEPT THAT IN THE CASE OF AN ERROR, 

THE PROGRAM WILL HALT AFTER THE ERROR TYPEOUT, AND 

THE PC+2 OF THE CALL TO THE ERROR ROUTINE WILL BE 
DISPLAYED IN RO. 

PROGRAM OPERATION WITH SW1i3<1 

SAME AS 5.3.1 EXCEPT THAT NO ERROR TYPEOUTS WILL OCCUR 
PROGRAM OPERATION WITH SWii=1 


_< AS 5.3.1 EXCEPT THAT EACH TEST WILL BE REPEATED ONCE 


PROGRAM OPERATION WITH SW10=1 


SAME AS 5.3.1, EXCEPT THAT IN THE CASE OF AN ERROR 
THE CURRENT TEST WILL BE ABORTED, AND THE PROGRAM 
WILL PROCEED TO THE NEXT TEST IN SEQUENCE. 
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1 
: 5. (CONT’D) 
: 5.3.8 PROGRAM OPERATION WITH SWi4=1, OR SWO9=1 
€ THESE FUNCTIONS ARE NORMALLY USED FOR TROUBLE SHOOTING. 
: SEE SECTION 6.3 FOR THEIR USE. 
10 pari 
6.1 ERROR HALTS 
13 THE ERROR MESSAGE FORMAT FOR ALL ERROR TYPEOUTS 
re IS AS FOLLOWS 
16 PC+2 MESS? i. 
17 HEADER CIF APPLICABLE) 
= DATA (IF APPLICABLE) 
20 WHERE 
21 PC+2 IS THE ADDRESS OF THE CALL TO THE ERROR HANDLER + 2 
22 MESSAGE IS AN ASCII MESSAGE DESCRIBING (BRIEFLY) THE FAILURE 
23 HEADER IS A DESCRIPTION OF THE DATA TO FOLLOW 
24 DATA IS OCTAL INFORMATION RELATING TO THE CAUSE OF THE FAILURE 
25 IF THE SAME ERROR OCCURS IN A GIVEN TEST ON THE SAME 
26 PASS, AND IF DATA IS ASSOCIATED WITH THAT ERROR, ONLY 
Hl DATA IS TYPE ON SUCCEEDING ERROR TYPEOUTS 
29 IF NO DATA IS ASSOCIATED WITH THE ERROR 
oe THE COMPLETE ERROR MESSAGE IS TYPED. 
. 6.1.1 ERROR DESCRIPTIONS 
=. SEE LISTING FOR DETAILS OF ERRORS 
+ 6.2 ERROR RECOVERY 
a 6.2.1 SWi5=0 
40 IF THE PROGRAM IS RUN WITH SW15=0, NO OPERATOT ACTION IS 
41 REQUIRED TO CONTINUE TESTING 
rt 6.2.2 SwWi5=1 
44 IF THE PROGRAM IS RUN WITH SWiS=1, TO CONTINUE TESTING 
45 AFTER THE PROGRAM HAS HALTED, PRESS THE PROCESSOR 
rs CONSOLE CONTINUE SWITCH 
- 6.2.3 ILLEGAL INTERRUPTS 
50 IF AN INTERRUPT OCCURS TO A VECTOR ADDRESS NOT 
51 SELECTED DURING PROGRAM INITIALIZATION, THE PROGRAM WILL 
52 HALT IN THE TRAPCATCHER. THE ADDRESS AT WHICH 
53 THE PROGRAM HALTS IS 2 GREATER THAN THE ADDRESS 
54 TO WHICH THE INTERRUPT OCCURED. THE PROGRAM MUST BE 
35 RESTARTED AT 200 TO RECOVER FROM THIS ERROR. 


— 








as 
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6.3 
6.3.1 


6.3.2 


SCOPE LOOPING 

TO SCOPE ON A SPECIFIC TEST, SET SWi4=1 AND SWi3=1 

THIS WILL CAUSE THE PROGRAM TO CONTINUOUSLY LOOP ON THE 
SAME TEST, AND WILL CAUSE ALL ERROR TYPEOUTS TO BE INHIBITED 
TO SCOPE ON A SPECIFIC VALUE OF A PARAMETER WITHIN 

A TEST, SET SWO9=1 TO FREEZE THE DATA 

(SEE LISTING FOR THOSE TESTS THAT INCORPORATE THIS FEATURE) 
(CONT’D) 

PROGRAM START TO SCOPE LOOP ON SELECTED TEST 

PERFORM SECTION 4.3.4 WITH SWi4=1 

RESTRICTIONS 

STARTING 

THE DH1i1 TEST CARD MUST BE INSTALLED 

RUNNING 

NONE 

MISCELLANEOUS 

EXECUTION TIME 

THE TIME FOR ONE PASS OF THE PROGRAM (END OF 

TYPEOUT OF CZDHC-C TO END OF TYPEOUT OF CZDHC-C) 

IS GIVEN FOR VARIOUS PROCESSORS IN THE TABLE BELOW 


TIME 
PROCESSOR 


POP-11705,10 
POP -11/20 
POP-117/40 
POP-11/45 





SEQ 10 
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PROGRAM DESCRIPTION 


THE FIRST GROUP OF TESTS VERIFIES THAT NO INTERRUPTS OCCUR 
WITH INTERRUPT ENABLES SET FOR EACH INTERRUPTING FUNCTICN 
AND THE ASSOCIATED DONE BIT OR FLAG FOR THAT FUNCTION CLEARED. 


THE NEXT GROUP OF TESTS VERIFIES THAT AN INTERRUPT DOES 
OCCUR IF A SPECIFIC DONE BIT OR FLAG IS SET, ALONG 

WITH ITS CORRESPONDING INTERRUPT ENABLE. 

AT THIS TIME, INTERRUPTS TO THE CORRECT VECTOR x. TESTED. 
IF AN INTERRUPT OCCURS TO ANY VECTOR OTHER THA N THOSE 


THE NEXT GROUP OF TESTS CHECKS TRANSMITTER NPR AND 

INTERRUPT LOGIC OPERATION FOR EACH LINE, IN AN 

INDIVIDUAL TEST FOR EACH LINE. THE BYTE COUNT FOR 

THE SELECTED LINE IS SET TO -1 (FOR 1 CHARACTER TRANSMISSION) 
THE BUS ADDRESS MEMORY IN <¥ 





GE IS 
» THE —_— REGISTER 


GISTER IS CHECKED TO 

AR BIT FOR THE SELECTED LIN HAS CLEARED, 
BYTE COUNT IS CHECKED TO SEE THAT IT WENT TO 0 

AND THE BUS ADDRESS REGISTER FOR THE —T LINE 

IS CHECKED TO SEE THAT IT INCREMENTED 


THE NEXT GROUP OF TESTS VERIFIES THAT A SINGLE SELECTED 

LINE WILL PERFORM TRANSMIT FUNCTIONS WITHOUT AFFECTING 

ANY OTHER LINE. THIS IS DONE BY SETTING ALL BYTE 

COUNTS TO -1, AND VERIFYING THAT ONLY THE LINE SELECTED 

FOR can Taek ae cn te YTE COUNT AND BUS ADDRESS 
WHEN TRANSMISSION HAS BEEN COMPLETED. 


NEXT TEST VERIFIES THAT A SINGLE CHARACTER CAN BE 
INTO THE CIN MAINTENANCE MODE). 





SEQ 11 
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10. 


CCONT’D) 


THE NEXT TEST VERIFIES THAT FROM 1 TO 63 CHARACTER 
CAN BE LOADED INTO THE SILO. AND THAT THE SILO FILL 
oe ee INDICATES THE CORRECT NUMBER OF CHARACTERS 


THE NEXT TEST VERIFIES THAT 64 CHARACTERS CAN BE LOADED 
INTO THE SILO, FROM 1 TO 64 CHARACTERS CAN BE READ OUT OF 
THE SILO, AND THAT THE SILO FILL REGISTER INDICATES THE 
NUMBER OF CHARACTERS REMAINING IN THE SILO. 


THE FINAL TEST VERIFIES THAT THE CHARACTER AVAILABLE 
FLAG WILL NOT BE SET UNTIL THE SILO FILL LEVEL EXCEEDS THE 
SILO ALARM LEVEL, FOR ALL ALARM LEVELS 0-63. 


LISTING 


SEQ 12 
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1 3 OMMAC-A - DH11 MACRO LIBRARY 

: 3s COPYRIGHT 1985. DIGITAL EQUIPMENT CORP.. MAYNARD. MASS. 01754 

4 

5 AIST 

. -MLIST MC.D.CD 
104 
4119 
131 
146 
158 
167 
303 
339 
Ht 

2 3 
563 
595 
607 
652 
664 
691 
712 
L$ s CMS REPLACEMENT HISTORY 
745 
7146 5 #9 SKONETSKI 26-APR-1985 16:23:08 “FIXED TYPO CAUSING ASSEMBLY ERRORS” 
747 s #8 SKONETSKI 22-APR-1985 16:48:03 “TYPO ERROR IN VECTOR CHANGE CODE SOURCE FIXED” 
reaps’ s #7 SKONETSKI 22-APR-1985 16:26:04 “ADDED CODE TO SET VECTORS FOR PWR FAIL, ERRORS, AND EMT 
749 s #6 SKONETSKI 22-APR-1985 14:22:35 “FIXED BRANCH ERROR IN END OF PASS ROUTINE” 
s #5 SKONETSKI 22-APR-1985 08:28:54 “FIXED BUG CAN OCTASC MACRO CALL WAS WRONG) AND ADDED A 






750 
Sbtenae OF PASS 
751. #4 SKONETSKI 18-APR-1985 14:20:15 “ADDED SOFTWARE SWITCH REG SUPPORT, aioe UNTESTED” 


752 #3 SKONETSKI 12-APR-1985 10:34:52 “FIXED PROBLEMS WITH SPURIOUS 
s #2 SKONETSKI 11-APR-1985 16:00:24 “ADDED MACRO FROM SYSMAC.SML THAT” SIZES FOR SOFTWARE SWI 


753 
TCH REGISTER” 
754 s #1 SKONETSKI 11-APR-1985 15:49:05 “LIBRARY FOR DW11 DIAGNOSTICS” 
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4 AIST 
3 ~NLIST »MD, CND 
S 000000 -HEADER ¢/1972,1976,1585/,+/DH11 TRANSMITTER AND RECEIVER BASIC LOGIC TEST/,*/CZDHC-CO/ 


sSTARTING PROCEDURE 

sLOAD PROGRAM 

sLOAD ADDRESS 000200 

sPRESS START 

sPROGRAM WILL TYPE DH11 TRANSMITTER AND RECEIVER BASIC LOGIC TEST 
sPROGRAM WILL TYPE “VECTOR ADDRESS - 


sTYPE IN THE ADDRESS OF THE SYSTEM CONTROL REGISTER 

sFOR THE OH11 TO BE TESTED, FOLLOWED BY <CARRIAGE RETURN> ; 3 
sPROGRAM WILL TYPE “R” TO INDICATE THAT TESTING HAS STARTED 

sAT THE END OF A PASS, PROGRAM WILL TYPE “ CZDHC-CO 

sAND THEN RESUM TESTING 


-TITLE CZDOHC-CO 


000000 ~-ENABLE ABS 
-NLIST MC .MD,CND 
LIST 
6 0C0000 . SYMBOL 
sSWITCH REGISTER OPTIONS 
100000 SW15=100000 s*1,HALT ON ERROR 
040000 SW14=40000 :*1,LO0P ON CURRENT TEST 
020000 SW13=20000 3*1, INHIBIT ERROR TYPEOUT 
010000 SW12=10000 
004000 SW12=4000 3*1, INHIBIT ITERATIONS 
002000 SW10=2000 3*1,ESCAPE TO NEXT TEST ON ERROR 3 3 
001000 SWO9=1000 :*1,LO0P WITH CURRENT DATA 
000400 SWO08 =400 
000100 SWO06=100 
000040 SWO5 
000020 SW04 =20 
000010 SWO3=10 
000004 SWO2 =4 
000002 SWO1=2 sRESTART PROGRAM AT SELECTED TEST 
000001 SWO0O=1 sRESELECT VECTOR AND aerete  perieee 


sADDRESS AFTER PROGRAM REST 


an SG te ee SS ER Se ee SS I RE So ee 








SE 
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0 
sREGISTER DEFINITIONS 

000000 RO=80 ;GENERAL REGISTER 

000001 Ri=s1 sGENERAL REGISTER 

000002 R2=82 sGENERAL REGISTER 

000003 R3=83 sGENERAL REGISTER 

000004 R4=84 sGENERAL REGISTER 

000005 R585 sGENERAL REGISTER 

000006 SP =86 Sanaa STACK POINTER 

000007 PC=87 PROGRAM COUNTER 


sLOCATION EQUIVALENCIES 


;SWR=177570 sCONSOLE SWITCH REGISTER 
sLIGHTS=177570 ;POP-11/45 DISPLAY REGISTER 


177776 PS*177776 sPROCESSOR STATUS WORD 
017270 STACK=ENDCOD +200 sSTART OF PROCESSOR STACK 
sINSTRUCTION DEFINITIONS 
005746 PUSH1SP=5746 sDECREMENT PROCESSOR STACK 1 WORD 
005726 POP1SP=5726 sINCREMENT PROCESSOR STACK 1 WORD 
010046 PUSHRO= 10046 sSAVE RO ON STACK 
012600 POPRO= 12600 sRESTORE RO FROM STACK 
024646 PUSH2SP=24646 ;DECREMENT STACK TWICE 
022626 POP2SP =22626 sINCREMENT STACK TWICE 
: 
-MACRO HLT $A 
EMT $A 
-ENDM HLT 
i 
i 
100000 BIT15=100000 
040000 BIT14=40000 
02000C BIT13=20000 
010000 BIT12=10000 
BIT11=4000 
002000 BIT10=2000 
001000 BITO9=1000 
000400 BITO8=400 
000200 61T07=200 
000100 BITO6=100 
000040 BITOS=40 
000020 BIT04=20 
000010 BITO3=10 
000004 BITO2=4 
000C02 BITO1=2 
000001 BITOO=1 
1 000000 -CATCH 





TR aT sin orn i 


CZ0HC-CO 
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900000 
000200 








; TRAPCATCAER FOR ILLEGAL INTERRUPTS 


“REPT 200 


sUNEXPECTED TRAP TO THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 


;UNEXPECTED TRAP TO THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 
sUNEXPECTED TRAP TO THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 
| UNEXPECTED TRAP TO THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 
sUNEXPECTED TRAP yp ie pile 


‘sEXAMINE STACK TO F 


sUNEXPECTED TRAP TO THIS LOCATION 
FIND CAUSE 


TR 
sEXAMINE STACK TO FIND CAUSE 
s UNEXPECTED gl <? THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 


TR 
sEXAMINE STACK TO FIND CAUSE 
TED TRAP 


CAUSE 
XPECTED TRAP TO THIS LOCATION 
; EXAMINE STACK TO FIND 
; *ECTED TRAP TO THIS LOCATION 
FIND CAUSE 


: TO FIND CAUSE 
sUNEXPECTED TRAP TO THIS LOCATION 


SEQ 16 
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sEXAMINE STACK TO FIND CAUSE 
sUNEXPECTED TRAP TO THIS LOCATION 
sEXAMINE STACK TO FIND CA 
sUNEXPECTED TRAP TO THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 

| UNEXPECTED TRAP TO THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 


CAUSE 
sUNEXPECTED TRAP ¥- THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 
sUNEXPECTED TRAP TO THIS LOCATION 
s EXAMINE STACK TO FIND CAUSE 
sUNEXPECTED TRAP TO THIS LOCATION 
s EXAMINE STACK TO FIND CAUSE 
sUNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 

TED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
sUNEXPECTED TRAP TO THIS LOCATION 
s EXAMINE STACK TO FIND CAUSE 

TED TRAP TO THIS LOCATION 
: EXAMINE STACK TO FIND CAUSE 

TED TRAP TO THIS LOCATION 
i EXAMINE STACK TO FIND CAUSE 

TED TRAP TO THIS LOCATION 
s EXAMINE STACK TO FIND CAUSE 

TED TRAP TO THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 

TED TRAP TO THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 

TED TRAP 








AUSE 
sUNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
s;UNEXPECTEO TRAP TO THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 


SEQ 17 


CZOHC-CO 


-— 
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EY SRE SEI LS LE LLL ALDI LIE OE LIE IL AELE EDEL AR EDEL E S| GLARE III EAE AR AEE EE PEE Ee Se IEEE OIE EDTA BD ime 





sUNEXPECTED TRAP TO THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 
sUNEXPECTED TRAP TO THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 
sUNEXPECTED TRAP TO THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 

ED TRAP TO THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 
sUNEXPECTED TRAP TO THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 
sUNEXPECTED TRAP TO THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 
sUNEXPECTED TRAP TO THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 
sUNEXPECTED TRAP yp Be LOCATION 


sEXAMINE STACK TO F AUSE 
; UNEXPECTED x, THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 


3; UNE TED TRAP “10 THIS LOCATION 
FIND CAUSE 


sEXAMINE STACK ND C 
sUNEXPECTED TRAP TO THIS LOCATION 
sEXAMINE STACK TO Cc 


FIND 

TED TRAP TO THIS LOCATION 

1 EXAMINE STACK TO FIND CAUSE 
TED TRAP TO THIS LOCATION 

| EXAMINE STACK TO FIND CAUSE 
sUNEXPECTED ge a THIS LOCATION 

sEXAMINE STACK TO FIND CAUSE 
sUNEXPECTED TRAP TO THIS LOCATION 

SEXAMINE STACK TO FIND CAUSE 
sUNEXPECTED TRAP TO THIS LOCATION 

1 EXAMINE STACK TO FIND CAUSE 
CTED TRAP TO THIS LOCATION 

s EXAMINE STACK TO FIND CAUSE 
sUNEXPECTED TRAP TO THIS LOCATION 

sEXAMINE STACK TO FIND CAUSE 
TRAP TO THIS LOCATION 

TO FIND CAUSE 


OF 
sUNEXPECTED TRAP e THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 
sUNEXPECTED TRAP TO THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 
s;UNEXPECTED TRAP TO THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 
sUNEXPECTED TRAP TO THIS LOCATION 








SEQ 19 
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000512 000000 HALT sEXAMINE STACK TO FIND CAUSE 
000514 000516 +2 sUNEXPECTED TRAP TO THIS LOCATION 
000516 000000 HALT sEXAMINE STACK TO FIND CAUSE 
000520 000522 .+2 s;UNEXPECTED TRAP TO THIS LOCATION 
000522 000000 HALT sEXAMINE STACK TO FIND CAUSE 
000524 000526 +2 sUNEXPECTED TRAP TO THIS LOCATION 
000526 000000 HALT sEXAMINE STACK TO FIND CAUSE 
000530 000532 .+2 sUNEXPECTED TRAP TO THIS LOCATION 
000532 000000 HALT sEXAMINE STACK TO FIND CAUSE 
000534 000536 .+2 sUNEXPECTED TRAP TO THIS LOCATION 
000536 000000 HALT sEXAMINE STACK TO FIND CAU 
000540 000542 .+2 ;UNEXPECTED TRAP TO THIS LOCATION 
000542 000000 HALT sEXAMINE STACK TO FIND CAUSE 
000544 000546 .+2 sUNEXPECTED TRAP TO THIS LOCATION 
000546 000000 HALT sEXAMINE STACK TO FIND CAU 
000550 000552 +2 sUNEXPECTED TRAP TO THIS LOCATION 
000552 000000 HALT sEXAMINE STACK TO FIND CAUSE 
000554 000556 +2 sUNEXPECTED TRAP TO THIS LOCATION 
000556 000000 HALT sEXAMINE STACK TO FIND CAUSE 
000560 000562 +2 sUNEXPECTED TRAP TO THIS LOCATION 
000000 HALT sEXAMINE STACK TO FIND CAUSE 
000564 000566 +2 sUNEXPECTED TRAP TO THIS LOCATION 
000566 000000 HALT sEXAMINE STACK TO F 
0C0570 000572 +2 sUNEXPECTED TRAP TO THIS LOCATION 
000572 000000 HALT sEXAMINE STACK TO FI AUSE 
000574 000576 a sUNEXPECTED TRAP TO THIS LOCATION 
000576 000000 HALT sEXAMINE STACK TO FIND CAUSE 
000600 000602 +2 sUNEXPECTED TRAP TO THIS LOCATION 
000602 000000 HALT sEXAMINE STACK TO FIND CAUSE 
000604 000606 +2 sUNEXPECTED TRAP TO THIS LOCATION 
000606 000000 HALT s EXAMINE STACK TO FIND CAUSE 
000610 000612 +2 sUNEXPECTED TRAP TO THIS LOCATION 
000612 000000 HALT 7: EXAMINE STACK TO FIND CAUSE 
000614 000616 +2 sUNEXPECTED TRAP TO THIS LOCATION 
000616 000000 HALT sEXAMINE STACK TO FIND 
000622 +2 3 UNE AP TO THIS LOCATION 
000622 0000C0 HALT sEXAMINE STACK TO FIND C 
000624 000626 +2 sUNEXPECTED TRAP TO THIS LOCATION 
000626 000000 HALT sEXAMINE STACK TO FIND CAUSE 
000630 000632 -+2 sUNEXPECTED TRAP TO THIS LOCATION 
000632 HALT sEXAMINE STACK TO 
000634 000636 -+2 sUNEXPECTED TRAP 70 THIS LOCATION 
000636 000000 ' HALT sEXAMINE STACK TO FIND C 
000640 000642 +2 sUNEXPECTED TRAP TO THIS LOCATION 
000642 000000 HALT sEXAMINE By By FIND CAUSE 
000644 000646 .*2 sUNEXPECTED TR gy THIS LOCATION 
000646 000000 HALT SEXAMINE STACK TO FIND CAUSE 
000650 000652 +2 ;UNEXPECTED TRAP TO THIS LOCATION 
000652 000000 HALT sEXAMINE STACK TO FIND CAU 
000654 000656 +2 sUNEXPECTED TRAP TO THIS LOCATION 
000656 000000 HALT sEXAMINE STACK TO FIND 
000660 000662 -+2 sUNEXPECTED TRAP TO THIS LOCATION 
000662 000000 HALT sEXAMINE STACK TO 
000664 000666 +2 sUNEXPECTED TRAP TO THIS LOCATION 
000666 000000 HALT sEXAMINE STACK TO FIND 
000670 000672 +2 sUNEXPECTED TRAP TO THIS LOCATION 
000672 000000 HALT sEXAMINE STACK TO FIND CAUSE 





—— 





-— 


. SETVEC 





sUNEXPECTED TRAP TO THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 
sUNEXPECTED TRAP TO THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 
s;UNEXPECTED TRAP TO THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 
sUNEXPECTED TRAP TO THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 
sUNEXPECTED TRAP TO THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 
sUNEXPECTED TRAP TO THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 
sUNEXPECTED TRAP TO THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 
sUNEXPECTED TRAP TO THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 
sUNEXPECTED TRAP TO THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 
sUNEXPECTED TRAP TO THIS LOCATION 
sEXAMINE STACK TO FIND CAU 
sUNEXPECTED TRAP TO THIS LOCATION 
FIND CAUSE 


FIND 
TED TRAP TO THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 
s;UNEXPECTED TRAP TO THIS LOCATION 
/ EXAMINE STACK TO FIND CAUSE 
sUNEXPECTED TRAP TO THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 


Om eOntOuS wh 


~_ 


—— 
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000200 
000167 


104400 
000001 


1044v1 
000002 
104402 
000003 
104403 
000004 
104404 
000005 
104405 
000006 
104406 
000007 


104407 
000010 


104410 
000011 


000046 
014232 
000052 
040000 





sSTANDARD INTERRLPT VECTORS 
JMP START ;GO TO START OF PROGRAM 


sDEFINITIONS FOR TRAP SUBROUTINE CALLS 
sPOINTERS TO SUBROUTINES CAN BE FOUND STARTING 
sAT LOCATION “TRPTAB” 


SCOPE, */SCOPE LOOP AND ITERATION HANDLER/ 


— ;SCOPE LOOP AND ITERATION HANDLER 
=V¥+ 
TYPE ,.*/TELETYPE OUTPUT ROUTINE/ 
— sTELETYPE OUTPUT ROUTINE 
zY¥e 
OCTASC.*/OCTAL TO ASCII CONVERSION/ 
— ;OCTAL TO ASCII CONVERSION 
2Ye 
INSTR, t/INPUT ASCII STRING/ 
—o sINPUT ASCII STRING 
2Ye 
INSTER,t/STRING INPUT ERROR/ 
—o sSTRING INPUT ERROR 
2V+ 
PARAM, — STRING TO OCTAL, CHECK LIMITS/ 
PARAM=TRAP + sCONVERT STRING TO OCTAL. CHECK LIMITS 
s¥e 
SAVOSP,,t/SAVE RO-RS, PC/ 
ow: ;SAVE RO-RS, PC 
sVe 
RESOS, t/RESTORE RO-RS/ 
= sRESTORE RO-RS 
2V+ 
SCOPE1,t/CHECK FOR FREEZE ON CURRENT DAT 
SCOPEL*T RAP+Y sCHECK FOR FREEZE. ON CURRENT DATA 
sVe 
CODEM1i 


sSET UP ADDRESS OF SILO 
R sSTATUS REGISTER HIGH BYTE 


1 
OHRVEC .3.4,DHSCR,O,177776,7.10,1..1 





SEQ 21 








SEQ 22 
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0 001000 . 1000 


sPROGRAM INITIALIZATION 
sLOCK OUT INTERRUPTS 
sSET UP PROCESSOR STACK 
;SET UP POWER FAIL VECTOR 
sCLEAR PROGRAM FLAGS AND COUNTS 
sTYPE TITLE MESSAGE 

TIF NB <i>, sDETERMINE MEMORY SIZE 


.LIF NB <>, ;SET UP TRACE TRAP RETURN 
001000 177570 SWR: -WORD 177570 ; SWITCH DHSCR ADDRESS ; 4 
001002 177570 LIGHTS: .WORD 177570 ; LIGHTS ; 4 
; 4 
001004 012767 000340 176764 START: MOV #340 ,PS ;LOCK OUT INTERRUPTS 
001012 012705 017270 MOV @STACK ,SP ;SET UP PROCESSOR STACK 
001016 012702 000024 MOV $24 ,R2 ; POINT TO VECTOR AREA 3; 7 
001022 012722 015616 MOV OPFAIL .CR2)+ ;SET UP POWER FAIL TRAP a 
001026 012722 000340 MOV @340, (R2)-+ sSERVICE AT LEVEL 7 ; 7 
001032 012722 014372 MOV @ERRORS, (R2)+ sERROR HANDLER 3 3 
001036 012722 9000340 MOV #340, (R2)+ ;SERVICE AT LEVEL 7 s ¥ 
001042 012722 014604 MOV STRPSRV, CR2)+ sGENERAL HANDLER DISPATCH SERVICE ; 7 
001046 012712 000340 MOV #340, C(R2) sSERVICE AT LEVEL 7 ; & 
001052 005067 014532 CLR STFLG sCLEAR TEST START FLAG 
001056 005067 014466 CLR PA ;CLEAR 
001062 0C5067 014464 CLR ERRCNT 3 AR COUNT 
1 065067 014454 CLR ERRFLG :CLEAR ERROR FLAG 
001072 005067 014450 CLR ERRFLG ;CLEAR LAST ERROR PC 
001076 016746 176702 MOV 4, -(SP) 3 RAP VECTOR ; 4 
001102 016746 176700 MOV 6, -C(SP) ; 4 
001106 012767 001122 176670 MOV #13, 4 ; SET UP TRAP VECTOR ; 4 
001114 005777 177660 TST aSwWR ; TEST SWITCH REGISTER ADDRESS 7 4 
ata 000405 “a BR 2¢ ; IF SUCCESSFUL, LEAVE IT ALONE 3 : 
001122 012767 000176 177650 MOV #176, SWR ; POINT TO SOFT SWITCH DHSCR ; 4 
eeitae 005067 177646 a CLR LIGHTS ; © MEANS WE ARE NOT GOING TO USE — : 4 
001134 005726 TST (SP) ; CLEAN UP STACK : 4 
001136 005726 TST (SP) ; 4 
001140 012667 176642 MOV CSP)+, 6 ; 4 
001144 012667 176634 MOV ¢ o, 4 ; 4 
001150 104401 015766 TYPE eMTITLE ;TYPE TITLE MESSAGE 
001154 005767 014426 TST INIFLG ;CHECK INITIALIZATION FLAG 
-IF NB <DHRVEC> 
001160 001021 BNE VEC1 :IF NOT 0, CHECK SWITCHES 
IFF 3FOR REINITIALIZATION 
BNE BEGIN :IF NOT 0, START TEST 
-ENDC 
-IF NB <i> 
001162 005000 SIZE: CLR RO 
001164 012737 001176 0900004 MOV 423,804 ;SET UP TIME OUT RETURN 
001172 005720 1$: TST CRO) > ;WILL TRAP WHEN NO MEMORY 3; 9 
001174 000776 BR 1$ ;LOCATION RESPONDEO, CONTINUE 
001176 010067 014412 2$: MOV RO ,HCORE :RO CONTAINS ADDRESS OF 
001202 162767 000002 014404 SUB #2 ,HCORE ;NON EXISTANT MEMORY : 9? 
001210 012737 000006 000004 MOV 06 , 804 sRESTORE TRAPCATCHER 


— 





CZOHC -CO 


-— 
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005767 
001404 


032777 
001445 


012701 


016767 
005267 


005767 
001002 
005167 


014364 
000001 
000300 
090302 
000004 


001000 


014204 
014200 


014246 
014240 


177546 


014204 


-ENOC 
-IF NB 


1$: 


BYTE 
BYTE 


: MOV #1$,9610 
RO 


MOV a 

MOV @RTI, TRTRET 
#12,8010 

MOV STRTRET , 8016 


<DHRVEC> 

<i> 

BR VEC2 

TST INIFLG 
BEQ VEC2 

BIT #SWO00 , BSWR 
BEQ BEGIN 


OHSSR, DHSLR 
DHSLR 


TST INIFLG 
BNE BEGIN 
COM INIFLG 


sPROGRAM START 


sCHECK FOR PROGRAM START AT SELECTED ADDRESS 








SEQ 23 


;SET UP ILLEGAL INSTRUCTION TRAP RETURN 
sD0 11/40, 11/45 INSTRUCTION 
311/40,45 RTT RETURN FROM TRACE TRAP 


:1105,10,20 RTI RETURN FROM TRACE TRAP 
sRESTROE TRAPCATCHER 
sSET UP TRACE TRAP VECTOR 


;IF INITIALIZE FLAG=0 
;GET VECTOR AND CSR ADDRESS 


;IF SWOO=1, SET NEW VECTOR ; 
;AND CSR 


sRESTORE TRAPCATCHER 
sIN FLOATING VECTOR APEA 


sINPUT ADDRESS OF DEVICE VECTOR 
sMESSAGE “VECTOR ADDRESS-* 
sCONVERT STRING TO OCTAL 

sLOW LIMIT 


sHIGH LIMIT 

sLOCATIONS TO BE FILLED 
sNUMBER OF LOCATIONS 

;LSB MASK 

;INPUT ADDRESS OF DEVICE CSR 
sMESSAGE “CONTROL REGISTEK ADDRESS-” 
sCONVERT STRING TO OCTAL 

;LOW LIMIT 

sHIGH LIMIT 

sLOCATIONS TO BE FILLED 

;sNUMBER OF LOCATIONS 

:LSB MASK 


sSET UP ADDRESS OF SILO 
sSTATUS REGISTER HIGH BYTE 


;IF INITIALIZATION FLAG 
:I1S CLEARED 
sSET IT 





MACRO V04.00 


001346 012767 000340 
001354 012706 017270 
000002 


0004 
001410 012767 001440 
001416 005767 014166 


001422 001004 
001424 005167 014160 
001430 104401 016252 


001434 000177 014114 


- 
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176422 BEGIN: 
177412 


-BYTE 
-BYTE 


014136 1%: 


23: 
3%: 


MOV 
MOV 


#340 .PS 
@STACK , SP 
oe 








SEQ 24 


sLOCK OUT INTERRUPTS 

sSET UP PROCESSOR STACK 

sIF SWO1=1 ; 4 
;GET PC FOR PROGRAM START 

;GET PC 

sMESSAGE “TEST PC“ 

s;CONVERT STRING TO OCTAL 


sNORMAL START, TEST 1 
;IF LOOPING, BYPASS TYPEQUT 


sTYPE “R” TO INDICATE START 
sSTART TESTING 





- 





















ssssssssessseeses 
=o3o a Peetetetcir 
poner SNSS 


ao 
RO 
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012767 


004000 
001726 


013734 
013726 


013642 
013656 


SEQ 25 


INTST1 */CHARACTER AVAILABLE/ ,BITO6 
INTERRUPT ¥ TEST 


3 LOG 
sSET CHARACTER AVAILABLE INTERRUPT ENABLE 
SVERIFY THAT NO INTERRUPTS OCCUR 

















TS \XN,4000, 38 
Ti: MOV #340 ,PS sDISABLE ALL INTERRUPTS 
a #4000, ;SET UP FOR 4000 ITERATIONS 
—_ OV 03% , ESCAPE ;SET UP TO ESCAPE TO NEXT TEST 
r <> 
MOV #,FREEZi sSET UP TO LOOP WITH DATA ee 
-ENOC 
AN-XNeo1 
MOV #61T11.@DHSCR sMASTER CLEAR INTERFACE 
MOV 41%, @DHRVEC ;SET UP FOR POSSIBLE 
sRECEIVER INTERRUPT 
MCV #340 , BDHRLVL 
MOV 62% , BHT VEC sSET UP FOR POSSIBLE 
sTRANSMITTER INTERRUPT 
MOV €340 , @DHTLVL 
MOV @681IT06 ,8D0HSCR sSET CHARACTER AVAILABLE 
s INTERRUPT ENABLE 
CLA PS sALLOW INTERRUPTS 
NOP sWINDOW FOR INTERRUPTS 
MOV 0340 ,PS sNO INTERRUPT OCCURED 
BR 3$ : CONTINUE 
1s; MOV SOHSCR .RS sGET CONTENTS OF yt al CONTROL REGISTER 
aad ; sUNEXPECTED INTERR 
MOV #33, (SP) sSET UP TO 
RTI sRETURN FROM INTERRUPT 
2%; MOV @DHSCR RS ;GET CONTENTS OF SYSTEM CONTROL REGISTER 
ya 2 sUNEXPECTED INTERRUPT 
MOV 63%,(SP) sSET UPT TO 
RTI sRETURN FROM INTERRUPT 
38; MOV sRESTORE TRAPCATCHER 
CLR 
MOV 
CLR 
SCOPE sCHECK FOR ITERATIONS, LOOP 
INTSTi ?* IT 
: i IMT 
sVERIFY THAT NO INTERRUPTS OCCUR 
TS \XN,4000, 38 
T2: MOV PS 
MOV » ICOUNT OR ITERATIONS 
— MOV @38 ,ESCAPE sSET UP TO ESCAPE TO NEXT TEST 
. © 
MOV @,FREEZi sSET UP TO LOOP WITH DATA 5 3 
XN@XNel 
MOV @B81IT11 ,@OHSCR sMASTER CLEAR INTERFACE 
MOV 01%, SDHRVEC sSET UP FOR POSSIBLE 
sRECEIVER INTERRUPT 
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012777 
012777 


012777 
012777 


012767 
012767 
012767 


000004 
012777 
012777 


012777 
012777 


012777 
012777 


005067 
000240 
012767 
000414 
017705 


104000 
012716 
000002 
017705 


000340 
004000 
002140 


013646 
013642 
013604 


176052 


013552 
013544 


1%: 










INTST1 


BSGCSRSHSSASRSSASTSGE 88 


TS \XN,4006, 3% 
T3 


i$: 


A 
SRSReStSge 88 38 88 8°988 


#340 , SDHRL VL 
42%, @DHTVEC 


34, (SP) 


eo 


0 

03%, (SP) 
DHRL VL , BDHRVEC 
GOHRLVL 
OHTLYL , @DHTVEC 
GOHTLVL 









TER DONE/ ,BIT13 
TEST 


@340 , BDHRL VL 
62% , BHT VEC 





0340 , @OHTLVL 
@61IT13,@DHSCR 
PS 

©3406 PS 

38 

ee as 

Q 

03% ,(SP) 
GOHSCR RS 





s CONTINUE 
sGET CONTENTS OF SYSTEM CONTROL REGISTER 
sUNEXPECTED INTERRUPT 


sSET UP TO 
sRETURN FROM INTERRUPT 
sGET CONTENTS OF SYSTEM CONTROL REGISTER 
sUNEXPECTED INTERRUPT 

sSET UPT T 
sRETURN FROM INTERRUPT 
sRESTORE TRAPCATCHER 


sCHECK FOR ITERATIONS, LOOP 


sDISABLE ALL INTERRUPTS 
sSET UP FOR 4000 ITERATIONS 
sSET UP TO ESCAPE TO NEXT TEST 


sSET UP TO LOOP WITH DATA +3 


sMASTER CLEAR INTERFACE 
sSET UP FOR POSSIBLE 
sRECEIVER 






sSET UP FOR POSSIBLE 
sTRANSMITTER INTERRUPT 


{GET CONTENTS OF SYSTEM CONTROL REGISTER 
sUNEXPECTED INTERRUPT 





sSET UP TO 
FROM INTERRUPT 
sGET CONTENTS OF SYSTEM CONTROL REGISTER 





_— < 


Eisen i adlians Setlelioasesiectocemebsaiiic> 
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012767 
012767 
012767 


000005 
012777 
012777 
012777 
012777 
012777 
012777 
052777 


052777 
005067 
000240 
012767 


002140 


013374 
013366 
013366 
013360 


002332 
013172 


002332 


013202 
013174 
013174 
013166 


013370 
013362 


013176 
013170 





INTST2 


7 \XN, 4000, 38 








~ ; sUNEXPECTED INTERRUPT 

MOV 033,(SP) sSET UPT TO 

RTI sRETURN FROM INTERRUPT 

MOV DHRL VL , @OHRVEC sRESTORE TRAPCATCHER 

CLR SBOHRLVL 

MOV DHTLVL ,@OHTVEC 

CLR SOHTLVL 

sc HECK FOR ITERATIONS, LOOP 


OPE sC 
*/CHARACTER AVAILABLE/ ,BITO7, +/CHARACTER AVAILABLE/ ,BIT06,1$%,2$ 


sINTERRUPT LOGIC TEST 

sSET CHARACTER AVAILABLE INTERRUPT ENABLE 

sSET CHARACTER AVAILABLE (MAINTENANCE MODE IS ENABLED 
sVERIFY THAT AN INTERRUPT OCCURS 





: MOV @340,PS sDISABLE ALL INTERRUPTS 
MOV #4000, ICOUNT sSET UP FOR 4000 ITERATIONS 
—— MOV o33, ESCAPE sSET UP TO ESCAPE TO NEXT TEST 
- <> 
MOV @,FREEZ1 sSET UP TO LOOP WITH DATA Es 
-ENDC 
XN=XNel 
MOV @81T11.8DHSCR sMASTER CLEAR INTERFACE 
ae SOHRVEC sSET UP FOR RECEIVER INTERRUPT 
ae ;SET UP FOR TRANSMITTER INTERRUPT 
MOV sSET MAINTENANCE 
BIS sSET CHARACTER AVAILABLE 
sINTERRUPT ENABLE 
BIS @8IT07 ,@DHSCR sFORCE INT BY 
sSETTING CHARACTER AVAILABLE 
CLR PS ;ALLOW INTERRUPTS 
NOP $ FOR INTERRUPTS 
MOV #340 .PS sNO INTERRUPT OCCURED 
~ : sWITH CHARACTER AVAILABLE INTERRUPT 
sENABLE AND CHARACTER AVAILABLE SET 
sERROR 
BR 33 
1$: MOV @33,(SP) ;SET UP TO RETURN 
RTI sFROM VALID INTERRUPT 
2%: MOV @OHSCR RS ;GET CONTENTS OF SYSTEM CONTROL REGISTER 
3 ; sUNEXPECTED INTERRUPT 
MOV 63%,(SP) ;SET UP TO RETURN 
RTI 7FROM UNEXPECTED INTERRUPT 
3$: on Te pateaideas sRESTORE TRAPCATCHER 
MOV DHTLVL .@OHTVEC 
CLR SOHTLVL 
SCOPE 
INTST2 t/SILO OVERFLOW/ ,BIT12,*t/SILO OVERFLOW/ .BIT14,1$.2$ 


sINTERRUPT LOGIC TEST 





CZOHC -CO 














SEQ 28 
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012767 
012767 
€12767 


000006 
012777 
012777 
012777 
012777 
012777 
012777 
052777 


052777 
005067 
000240 
012767 
104001 


012767 
012767 
012767 


000007 


010000 
175310 
000340 


002524 


012774 


002716 


175410 


013004 
012776 


175216 
012774 
012762 


sSET SILO OVERFLOW INTERRUPT ENABLE 
:SET SILO OVERFLOW (MAINTENANCE MODE IS ENABLED 
sVERIFY THAT AN INTERRUPT OCCURS 


TS \XN,4000, 33 


TS: 


INTST2 


T6 


-IF NB 
-ENDC 


XN=XNeol 


ERS Ce ee ON OIE eee Some 


TS \XN,4600,3$ 
: MOV 


MOV @340 ,PS sDISABLE ALL INTERRUPTS 
MOV #4000, ICOUNT ;SET UP FOR 4000 ITERATIONS 
MOV @3$, ESCAPE ;SET UP TO ESCAPE TO NEXT TEST 
<> 
MOV @,FREEZ1 ;SET UP TO LOOP WITH DATA ; 3 
MOV @BIT11,8DHSCR sMASTER CLEAR INTERFACE 
4 @1$,@DHRVEC sSET UP FOR RECEIVER INTERRUPT 
MOV @2$, SDHTVEC sSET UP FOR TRANSMITTER INTERRUPT 
MOV @340 , BOHTLVL 
MOV @BITO9 ,.@DHSCR ;SET MAINTENANCE MODE 
BIS @2IT14,80HSCR sSET SILO OVERFLOW 
sINTERRUPT ENABLE 
BIS 681IT12,8DHSCR sFORCE INTERRUPT BY 
:SETTING SILO OVERFLOW 
CLR PS ;ALLOW INTERRUPTS 
NOP sWINDOW FOR INTERRUPTS 
MOV €340.P5S sNO INTERRUPT OCCURED 
om : sWITH SILO OVERFLOW INTERRUPT 
sENABLE AND SILO OVERFLOW SET 
sERROR 
BR 33 
MOV @33,(SP) sSET UP TO RETURN 


RTI sFROM VALID INTERRUPT 

MOV SDHSCR RS sGET CONTENTS OF SYSTEM CONTROL REGISTER 
a : : sUNEXPECTED INTERRUPT 

MOV @3$,(SP) ;SET UP TO RETURN 

RTI sFROM UNEXPECTED INTERRUPT 

MOV DHRL VL , SOHRVEC sRESTORE TRAPCATCHER 

CLR GOHRLVL 

MOV DHTLVL , @OHTVEC 

oe SOHTLVL 


OPE 
+/NON EXISTATN MEMORY/ ,BIT10, t/TRANSMITTER/ .BIT13,2$.1$ 


sINTERRUPT LOGIC TEST 

sSET TRANSMITTER INTERRUPT ENASLE 

SET NON EXISTATN MEMORY (MAINTENANCE MODE IS ENABLED 
sVERIFY THAT AN INTERRUPT OCCURS 


sDISABLE ALL INTERRUPTS 
:;SET UP FOR 4000 ITERATIONS 
sSET UP TO ESCAPE TO NEXT TEST 


sSET UP TO LOOP WITH DATA 


@340,PS 
MOV #4000, ICOUNT 
MOV 3% , ESCAPE 


<> 


MOV #,FREEZ1 


+ 














nate a a te 





SEQ 29 





000240 





sWINDOW FOR INTERRUPTS 
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002574 012777 004000 012712 MOV @BIT11,8DHSCR sMASTER CLEAR INTERFACE 
002602 012777 002702 012726 MOV 92%, 8DHRVEC sSET UP FOR RECEIVER INTERRUPT 
002610 012777 000340 012722 MOV @340 , BDHRLVL 
002616 012777 002674 012716 MOV 1%, QD0HTVEC ;SET UP FOR TRANSMITTER INTERRUPT 
002624 012777 000340 012712 MOV #340 ,@DHTLVL 
002632 012777 001000 012654 MOV ¢B81T09,8DHSCR ;SET MAINTENANCE MODE 
002640 052777 020000 012646 BIS @6IT13,@DHSCR ;SET TRANSMITTER 
s INTERRUPT ENABLE 
002646 052777 002000 012640 BIS @BIT10,8DHSCR sFORCE INTERRUPT BY 
sSETTING NON EXISTATN MEMORY 
002654 005067 175116 CLR PS sALLOW INTERRUPTS 
002660 000240 NOP sWINDOW FOR INIERRUPTS 
002662 012767 000340 175106 MOV 6340 ,PS sNO INTERRUPT OCCURED 
002670 HLT 1 sWITH TRANSMITTER INTERRUPT 
00267C 104001 EMT 1 
sENABLE AND NON EXISTATN MEMORY SET 
sERROR 
002672 000411 BR 38 
002674 012716 002716 is: MOV @33,(SP) ;SET UP TO RETURN 
002700 RTI sFROM VALID INTEPRUPT 
002702 017705 012606 23: MOV SOHSCR ,RS sGET CONTENTS OF SYSTEM CONTROL REGISTER 
002706 HLT 0 SUNEXPECTED INTERRUPT 
002706 1 EMT 0 
0C2710 012716 002716 MOV @33,(SP) ;SET UP TO RETURN 
002714 RTI sFROM UNEXPECTED INTERRUPT 
002716 016777 012616 012612 3%: MOV DHRL VL . BDHRVEC sRESTORE TRAPCATCHER 
002724 005077 012610 CLR BOHRLVL 
002730 016777 012610 012604 MOV DHTLVL , SDHTVEC 
002736 005077 012602 CLR SDHTLVL 
002742 104400 sc 
002744 IN’TST2 *t/TRANSMITTER DONE/,BIT15,*/TRANSMITTER DONE/,.BIT13.2$.1$ 
sINTERRUPT LOGIC TES 
sSET TRANSMITT INTERRUPT ENABLE 
3SET TRANSMITTER DONE (MAINTENANCE MODE IS ENABLED 
SVERIFY THAT AN INTERRUPT OCCURS 
002744 TS \XN,4000, 3$ 
002744 012767 000340 175024 T7: MoV sDISABLE S 
002752 012767 012602 MOV sSET UP FOR 4000 ITERATIONS 
002760 012767 003110 012570 a in MOV sSET UP TO ESCAPE TO NEXT TEST 
- <> 
MOV ;SET UP TO LOOP WITH DATA : 3 
-ENDC 
000010 XN=XNeol 
002766 012777 012520 MOV sMASTER CLEAR INTERFACE 
002774 012777 003974 012534 MOV ;SET UP FOR RECEIVER INTERRUPT 
003002 012777 000340 012530 MOV 
003010 012777 003066 012524 MOV 3SET UP FOR TRANSMITTER INTERRUPT 
003016 012777 000340 012520 MOV 
003024 012777 001000 012462 MOV ;SET MAINTENANCE MODE 
003032 052777 020000 012454 BIS #6IT13,@8DHSCR SSET TRANSMITTER DONE 
sINTERRUPT ENABLE 
003040 052777 100000 012446 BIS #6IT15,8DHSCR sFORCE INTERRUPT BY 
;SETTING TRANSMITTER DONE 
003046 005067 174724 CLR PS :ALLOW INTERRUPTS 


003136 
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012767 000340 174714 


104001 


000411 
012716 


000002 
017705 


104000 
012716 


000002 
016777 
005077 


012767 
012767 
012767 


000011 
012777 
004767 


012777 
012777 
012777 
012777 
012700 
012777 


052777 


003110 
012414 


003110 


012424 
012416 
012416 
012410 


012420 
012412 


174632 
012410 
012376 


012302 
012272 
012252 


MOV #340 ,PS 
HLT 1 
EMT 1 
BR 3$ 

i$: MOV @3$,(SP) 
RTI 

2s: MOY SOHSCR RS 
HLT 0 
EMT 0 
MOV #3$, (SP) 
RTI 

3$: MOV DHRLVL , BDHRVEC 
CLR SDHRLVL 
MOV DHTLVL ,@DHTVEC 
CLR SDHTLVL 
SCOPE 

LINE =0 

XL INE =t_ INE 

BITX=1 

XBIT=BSITX 

-REPT 

NPRTS \LINE, \BITX 

-NLTS 
LINE =LINE+1 

BITX=*BITX+BITX 

-LIST 

-ENDR 

NPRTS \LINE, \BITX 


TS \XN,20,6% 
MOV 


sNPR LOGIC TEST 

sSET BYTE COUNT TO 1 FOR LINE 0 
{SET BAR BIT FOR LINE 0 

sDELAY FOR NPR 


FPR ne 6 PEER TO I ALE A I El PEN TATA « EA GOS. CP RESRIL SRST DDE RSE OT a ee 


SEQ 30 


sNO INTERRUPT OCCURED 
sWITH TRANSMITTER DONE INTERRUPT 


sENABLE AND TRANSMITTER DONE SET 
sERROR 


sSET UP TO RETURN 

sFROM VALID INTERRUPT 

sGET CONTENTS OF SYSTEM CONTROL REGISTER 
sUNEXPECTED INTERRUPT 


;SET UP TO RETURN 
sFROM UNEXPECTED INTERRUPT 
sRESTORE TRAPCATCHER 


;VERIFY THAT BAR BIT FOR LINE O CLEARS 
sVERIFY THAT TRANSMITTER DONE IS SET 


T10: €340 PS 
MOV #20, ICOUNT 
MOV 06% , ESCAPE 
-IF NB <> 
®,FREEZ1 
-ENDC 
XN=XNe1 
#68IT11,@DHSCR 
PC ..CLEAR 
MOV 62% , BHT VEC 
MOV 0340 , @DHTLVL 
MOV » @DHSCR 
MOV #-1,8DHBC 
MOV #1000, RO 
MOV #1, 8DHBAR 
BIS #681IT13,@DHSCR 


sDISABLE ALL INTERRUPTS 
sSET UP FOR 20 ITERATIONS 
3SET UP TO ESCAPE TO NEXT TEST 


sSET UP TO LOOP WITH DATA 


we 
Os 


sISSUE MASTER CLEAR 

;sCLEAR ALL BUS ADDRESS 

sAND BYTE COUNT MEMORY LOCATIONS 
ANSMITTER 


LINE 0 
sSET BYTE COUNT TO 1 
s;SET BAR BIT FOR 
& 
sSET TRANSMITTER INTERRUPT ENADLE 
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003374 
003374 
003402 
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SEQ 31 


sALLOW INTERRUPTS 
s;DELAY FOR NPR 


sNO INTERRUPT OCCURED, ERROR 


;sVERIFY THAT TRANSMITTER 
s;DONE IS SET 


s TRANSMITTER DONE NOT SET, ERROR 


sWAS BAR BIT CLEARED FOR LINE 0 


;(RS)=EXPECTED DATA IN 

;sBUFFER ACTIVE REGISTER, 0 
:(R4)=ACTUAL CONTENTS OF 

sBUFFER ACTIVE REGISTER 

;sBUS ACTIVE BIT NOT CLEARED, ER2OR 


sWAS BUS ADDRESS INCREMENTED 


3(R4)=ACTUAL CONTENTS 

;0F BUS ADDRESS MEMORY FOR 
sLINE 0 

sCRS)*EXPECTED VALUE OF 
s;BUS ADDRESS MEMORY FOR 
sLINE 0, 1 

sBUS ADDRESS NOT UPDATED 


sCORRECTLY, ERROR 
:DID BYTE COUNT DECREMENT TO 0 


3CR4)=ACTUAL VALUE OF BYTE 
sCOUNT FOR LINE 0 

pc VALUE OF BYTE 
sCOUNT F 0. 0 


LINE 
:BYTE COUNT DID NOT DECREMENT TO 0. ERROR 


4 
DHRLVL ,@DHRVEC ;RESTORE TRAPCATCHER 
SOHRLVL 


005067 174530 CLR PS 
005300 i$: DEC RO 
001376 BNE i$ 

HLT 1 
104001 EMT 1 
005777 012234 2s: TST 8DHSCR 
100401 BMI 3$ 

HLT 2 

EMT 2 
005777 012236 3$: TST SDHBAR 
001404 BEQ 4% 
005005 CLR RS 
017704 012226 MOV SOHBAR ,R4 

HLT 0 

EMT 0 
022777 000001 012212 4%: CMP #1, 80HBA 
001405 BEQ 3$ 
017704 012204 MOV SOHBA , R4 
012705 000001 MOV #1,R5 

HLT 3 
104003 EMT 3 
005777 012174 3$: TST SOHBC 
001416 BEQ 6$ 
017704 012166 MOV SDHBC.R4 
005005 CLR RS 

HLT & 
104004 EMT 
016777 012172 012166 MOV 
005077 012164 CLR 
016777 012164 012160 MOV DHTLVL ,@DHTVEC 
005077 012156 CLR SDHTLVL 
012706 017270 6$: MOV aSTACK., SP 
104400 eo 
000001 LINE *LINE+1 
000002 BITX*BITX+BITX 

NPRTS \LINE,\BITX 


sNPR LOGIC TEST 


sSET BYTE ge TO 1 FOR LINE 1 
LINE 1 


SET BAR BIT F 
sDELAY FOR NPR 


sRESTORE STACK 
s;CHECK FOR ITERATIONS, LOOP 


;sVERIFY THAT BAR BIT FOR LINE 1 CLEARS 
sVERIFY THAT TRANSMITTER DONE IS SET 


TS \XN,20,6$ 
012767 000340 174374 T11: MOV 
012767 000020 012152 MOV 


#340 ,PS 


#20, ICOUNT 


sDISABLE ALL INTERRUPTS 
;SET UP FOR 20 ITERATIONS 
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012767 003624 012140 


000012 
012777 
004767 


012777 


004000 
011772 
003512 
000340 
000001 
177777 
001000 
000002 


020000 
174272 
011776 


012000 
011770 


000001 
011746 


000001 


011736 
011730 


011720 


012070 


012104 
01210 
012042 
012044 
012034 


012014 


011754 


012730 
011722 


-ENOC 
XN=XNeo1 


i$: 


2$: 


3$: 


4$: 


5$: 


96%, ESCAPE 
¢,FREEZ1 


#81711 ,8DHSCR 


PC ,CLEAR 


#2$ , BHT VEC 
#340 , @DHTLVL 


#2 ,8D0HBAR 


#681T13,8DHSCR 
PS 


RO 
i$ 


DHRLVL , BOHRVEC 
SOHRLVL 
ae 


SDHTLV 





sRESTORE TRAPCATCHER 





SEQ 32 


;SET UP TO ESCAPE TO NEXT TEST 
;SET UP TO LOOP WITH DATA 3 3 


s;ISSUE MASTER CLEAR 

;sCLEAR ALL BUS ADDRESS 

sAND BYTE COUNT MEMORY LOCATIONS 
sSET UP TRANSMITTER 

s INTERRUPT VECTOR 

sSELECT LINE 1 

s;SET BYTE COUNT TO 1 


;SET BAR BIT FOR 

sLINE 1 

;SET TRANSMITTER INTERRUPT ENABLE 
sALLOW INTERRUPTS 

;DELAY FOR NPR 

;NO INTERRUPT OCCURED, ERROR 


sVERIFY THAT TRANSMITTER 
i IS SET 


s TRANSMITTER DONE NOT SET, ERROR 


sWAS BAR BIT CLEARED FOR LINE 1 


3(RS)*EXPECTED DATA IN 

sBUFFER ACTIVE REGISTER, 0 
s(R4)=ACTUAL CONTENTS OF 

sBUFFER ACTIVE REGISTER 

sBUS ACTIVE BIT NOT CLEARED, ERROR 


sWAS BUS ADDRESS INCREMENTED 


3(R4)=ACTUAL CONTENTS 
eg ADDRESS MEMORY FOR 


3L 
:(CRS)=*EXPECTED VALUE OF 
;BUS ADDRESS MEMORY FOR 


;LINE i. i 
3BUS ADDRESS NOT UPDATED 


s;CORRECTLY, ERROR 
sDID BYTE COUNT DECREMENT TO 0 


s(R4)=ACTUAL VALUE OF BYTE 

sCOUNT FOR LINE 1 

sCRS)*EXPECTED VALUE OF BYTE 

sCOUNT FOR LINE 1, 

sBYTE COUNT DID NOT DECREMENT TO 0, ERROR 
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-— 


003624 
003630 


003632 





SEQ 3 
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012706 017270 6$: MOV @STACK ,SP sRESTCRE STACK 
104400 SCOPE sCHECK FOR ITERATIONS, LOOP 
000002 LINE =LINE+1 
000004 BITX=BITX+BITX 
NPRTS \LINE,\BITX 
sNPR LOGIC TEST 
sSET BYTE COUNT TO 1 FOR LINE 2 
;SET BAR BIT FOR LINE 2 
sDELAY FOR NPR 
;VERIFY THAT BAR BIT FOR LINE 2 CLEARS 
;VERIFY THAT TRANSMITTER DONE IS SET 
TS \XN,20,6$ 
012767 000340 174136 Tl2: MOV #340 PS sDISABLE ALL INTERRUPTS 
012767 000020 011714 MOV #20, ICOUNT sSET UP FOR 20 ITERATIONS 
012767 011702 - a MOY 06%, ESCAPE sSET UP TO ESCAPE TO NEXT TEST 
‘ <> 
memes MOV @,FREEZ1 ;SET UP TO LOOP WITH DATA ; 3 
000013 XN=XNe1 
012777 011632 MOV #81T11,@DHSCR sISSUE MASTER CLEAR 
004767 011534 JSR PC CLEAR ;CLEAR ALL BLS ADDRESS 
sAND BYTE COUNT MEMORY LOCATIONS 
012777 003750 011646 MOV #2$% , SOHTVEC sSET UP TRANSMITTER 
012777 000340 011642 MOV #340 , @DHTLVL sINTERRUPT VECTOR 
012777 011604 MOV #2 ,8DHSCR sSELECT LINE 2 
012777 177777 011606 MOV #-1,80HBC sSET BYTE COUNT TO i 
012700 001000 MOV «RO 
012777 000004 011576 MOV . ey BIT FOR 
5 
052777 020000 011556 BIS @81T13,8DHSCR sSET TRANSMITTER INTERRUPT ENABLE 
005067 174034 CLR PS sALLOW INTERRUPTS 
005300 1$: DEC RO sDELAY FOR NPR 
001376 BNE i$ 
‘ on : sNO INTERRUPT OCCURED, ERROR 
005777 011540 23: TST @DHSCR sVERIFY THAT TRANSMITTER 
sDONE IS SET 
100401 BMI 3$ 
at . TRANSMITTER DONE NOT SET, ERROR 
1 
005777 011542 3$: TST S0HBAR sWAS BAR BIT CLEARED FOR LINE 2 
001404 BEQ 4$ 
005005 CLR RS sCRS)*EXPECTED DATA IN 
sBUFFER ACTIVE REGISTER, 0 
017704 011532 MOV SOHBAR ,R4 sCR4)=ACTUAL CONTENTS OF 
:;BUFFER ACTIVE REGISTER 
aa ; 3BUS ACTIVE BIT NOT CLEARED, ERROR 
022777 000001 011516 4$: CMP #1, 80HBA sWAS BUS ADDRESS INCREMENTED 
001405 BEC 5$ 
017704 011510 MOV SOHBA,R4 ;CR4)=ACTUAL CONTENTS 
ge ye ADDRESS MEMORY FOR 
; 
012705 000001 MOV #1,R5 :CRS)*EXPECTED VALUE OF 





sBUS ADDRESS MEMORY FOR 





CZOHC -CO 


004916 
004016 


ne oe F 








SEQ 34 
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012767 
012767 
012767 


000014 
012777 


011500 
011472 


011476 
0 


017270 


000340 
004320 


020000 
173576 


011302 


011472 
011464 


173700 
011456 
011444 
011374 


011410 


3 INE Ze i 
~. : sBUS ADDRESS NOT UPDATED 
sCORRECTLY, ERROR 
S$ ane ate ;D0ID BYTE COUNT DECREMENT TO 0 
MOV @DHBC,R4 ;CR4)*ACTUAL VALUE OF BYTE 
iC OR LINE 2 
CLR RS sCRS)*EXPECTED VALUE OF BYTE 
~A s;BYTE COUNT DID NOT DECREMENT TO 0, ERROR 
MOV DHRLVL,@DHRVEC ;RESTORE TRAPCATCHER 
CLR SOHRLVL 
MOV DHTLVL , @DHTVEC 
CLR SDHTLVL 
6$: MOV OSTACK , SP sRESTORE STACK 
SCOPE ;CHECK FOR ITERATIONS, LOOP 
LINE =LINE+1 
BITX=BITX+BITX 
NPRTS \LINE,\BITX 


sNPR LOGIC TEST 

;SET BYTE COUNT TO 1 FOR LINE 3 

;SET BAR BIT FOR LINE 3 

;DELAY FOR NPR 

;VERIFY THAT BAR BIT FOR LINE 3 CLEARS 
;VERIFY THAT TRANSMITTER DONE IS SET 


TS \XN,20,68 
Ti3: MOV #340 ,.PS s;DISABLE ALL ERRUPTS 
MOV @20, ICOUNT ;SET UP FOR 20 ITERATIONS 
oe MOV 063, ESCAPE sSET UP TO ESCAPE TO NEXT TEST 
‘ <> 
MOV @,FREEZ1 sSET UP TO LG. WITH DATA 3; 3 
-ENDC 
XN=XNel1 
MOV @6IT11,@0HSCR sISSUE MASTER CLEAR 
JSR PC CLEAR s;CLEAR ALL BUS ADDRESS 
sAND BYTE COUNT MEMORY LOCATIONS 
MOV @2% , @DHTVEC ;SET UP TR 
MOV 6340 ,BDHTLVL sINTERRUPT VECTOR 
MOV 93 ,GDHSCR sSELECT LINE 3 
MOV #-1,@DHBC ;SET BYTE COUNT TO 1 
MOV #1000,R0 
MOV #10, SDHBAR Hg gy BIT FOR 
: 
BIS 661IT13.8DHSCR sSET TRANSMITTER INTERRUPT ENABLE 
CLR PS sALLOW INTERRUPTS 
i$: on ; sDELAY FOR NPR 
2s: TST SD0HSCR ;VERIFY THAT TRANSMITTER 
;DONE IS SET 
BMI 33 
HLT 2 sTRANSMITTER DONE NOT SET, ERROR 





-— 





MACRO VO4.00 27-JUN-85 12:51:38 PAGE 20-10 


104002 


005777 
001404 
005005 


017704 


104000 
022777 
001405 
017704 


012705 


012767 
012767 
012767 


011304 
011274 


000001 
011252 


000340 
000020 
004556 


011260 


011234 
011226 


173442 
011220 
011206 
011136 


011152 


EMT 2 
3$: TST 80HBAR 
BEQ 4$ 
CLR RS 
MOV QDHBAR ,R4 
HLT 0 
EMT ¢) 
4$; ChP #1 ,80HBA 
BEQ 5$ 
MOV SDHBA,R4 
MOV #1,R5 
HLT 3 
EMT 3 
S$: TST SDHBC 
BEQ &$ 
MOV SOHBC ,.R4 
CLR R5 
HLT 4 
EMT 4 
oy DHRL VL , SDHRVEC 
MOV DHTLVL ,@DHTVEC 
CLR VL 
63: MOV @STACK ,SP 
LINE =LINE+1 
BITX=BITX+BITX 
NPRTS \LINE, \BITX 
sNPR LOGIC TEST 


-IF NB 


-ENDC 
XN=XNe+1 


sSET BYTE COUNT TO 1 ey LINE 4 
LINE 4 


sSET BAR BIT oa 
FOR NPR 


DELAY 
{VERIFY THAT BAR BIT FOR LINE 4 CLEARS 
sVERIFY THAT TRANSMITTER DONE IS SET 


TS \XN,20,6% 
Ti MOV 


<> 


V 
JSR 
MOV 





@, FREEZ1 


#681111, 8DHSCR 
PC CLEAR 


2%, 80HTVEC 





s;WAS BAR BIT CLEARED FOR LINE 3 


sRESTORE TRAPCATCHER 





















SEQ 35 


3CRS)*EXPECTED DATA IN 

sBUFFER ACTIVE REGISTER, 0 
sCR4)=ACTUAL CONTENTS OF 

s;BUFFER ACTIVE REGISTER 

sBUS ACTIVE BIT NOT CLEARED, ERROR 


sWAS BUS ADDRESS INCREMENTED 


3(R4)=ACTUAL CONTENTS 

s;0F BUS ADDRESS MEMORY FOR 
;LINE 3 

;CRS)=EXPECTED VALUE OF 
sBUS ADDRESS MEMORY FOR 


sLINE 3, i 
38US ADDRESS NOT UPDATED 


sCORRECTLY, ERROR 
sDID BYTE COUNT DECREMENT TO 0 


sCR4°ACTUAL VALUE OF BYTE 
sCOUNT FOR LINE 3 

s(RS)=EXPECTED VALUE OF BYTE 

sCOUNT FOR LINE 3, © 

sBYTE COUNT DID NOT DECREMENT TO 0. ERROR 


sRESTORE STACK 
sCHECK FOR ITERATIONS, LOOP 


sSET UP TO ESCAPE TO NEXT TEST 
sSET UP TO LOOP WITH DATA 3 3 


sISSUE MASTER CLEAR 

sCLEAR ALL BUS ADDRESS 

sAND BYTE COUNT MEMORY LOCATIONS 
:;SET UP TRANSMITTER 


-— 
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SEQ 36 


012777 000340 011146 MOV 0340 , @DHTLVL ; INTERRUPT YEETOR 
012777 011110 MOV #4 ,8DHSCR ;SELECT LI 
012777 177777 O111i2 MOV @-1,@DHBC ;SET BYTE COUNT TO 1 
012700 001000 MOV #1000,R0 
012777 20 011102 MOV #20, 15 Bary BIT FOR 
; 
052777 020000 011062 BIS @BIT13,.8DHSCR ;SET TRANSMITTER INTERRUPT ENABLE 
005067 173340 CLR PS sALLOW INTERRUPTS 
005300 i$: DEC RO ;DELAY FOR NPR 
001376 BNE i$ 
HLT 1 sNO INTERRUPT OCCURED, ERROR 
104001 EMT i 
005777 011044 23: TST SDHSCR sVERIFY THAT TRANSMITTER 
sDONE IS SET 
100401 BMI 33 
aM : ; TRANSMITTER DONE NOT SET, ERROR 
005777 011046 3$: TST SBOHBAR sWAS BAR BIT CLEARED FOR LINE 4 
001404 BEQ 43 
00 CLR RS :€RS)=EXPECTED DATA IN 
sBUFFER ACTIVE REGISTER, 0 
017704 011036 MOV BOHBAR ,R4 8 sACTUAL CONTENTS 
sBUFFER ACTIVE REGISTER 
. an ; :BUS ACTIVE BIT NOT CLEARED, ERROR 
"22777 000001 011022 43: CMP 01 ,@0HBA sWAS BUS ADDRESS INCREMENTED 
001405 BEQ 53 
017704 011014 MOV GOHBA,R4 :CR4)=ACTUAL CONTENTS 
He! ors ADDRESS MEMORY FOR 
3 
012705 000001 MOV #1,R5 :(R5)-EXPECTED VALUE OF 
rt Ay or va a MEMORY FOR 
: 
HLT 3 ;BUS apoRess NOT UPDATED 
104003 EMT 3 
sCORRECTLY. ERROR 
005777 011004 5$: TST SOHBC :0I0 BYTE COUNT DECREMENT TO 0 
001416 BEQ 6$ 
017704 010776 MOV GOHBC ,R4 ;(R4)=ACTUAL a OF BYTE 
sCOUNT FOR LINE 4 
005005 CLR R5 s CRS )eEXPECTED ae OF BYTE 
sCOUNT FOR LINE 4, 0 
HLT 4 sBYTE COUNT DID NOT DECREMENT TO 0, ERROR 
104004 EMT 4 
016777 011002 010776 MOV DHRLVL ,S@DHRVEC ;RESTORE TRAPCATCHER 
010774 CLR SOHRLVL 
016777 010774 010770 MOV OHTLVL , @DHTVEC 
005077 0107 CLR GOHTLVL 
012706 017270 6$: MOV @STACK ,SP sRESTORE STACK 
104400 ;CHECK FOR ITERATIONS, LOOP 
000005 LINE =LINE +1 
000040 BITX=BITX+BITX 
NPRTS \LINE,\BITX 


sNPR LOGIC TEST 
sSET BYTE COUNT TO 1 FOR LINE 5 
sSET BAR BIT FOR LINE 5 








SSE LE A ST EE LN ET SS CT NE AF PE Ae A SE OA 
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sDELAY FOR NPR 
;sVERIFY THAT BAR BIT FOR LINE 5 CLEARS 
;VERIFY THAT TRANSMITTER DONE IS SET 
004564 TS \XN,20,6% 
004564 012767 000340 173204 T15: MOV #340 ,PS sDISABLE ALL INTERRUPTS 
004572 012767 000020 010762 MOV #20, ICOUNT sSET UP FOR 20 ITERATIONS 
0046 012767 005014 010750 ~ in MOV #6$ , ESCAPE ;SET UP TO ESCAPE TO NEXT TEST 
‘ «> 
“— MOV @,FREEZ1 ;SET UP TO LOOP WITH DATA 
000016 XN=XNeo1 
004606 012777 010700 MOV #61T11,@D0HSCR sISSUE MASTER CLEAR 
004614 004767 010602 JSR PC CLEAR ;sCLEAR ALL BUS ADDRESS 
sAND BYTE COUNT MEMORY LOCATIONS 
004620 012777 004702 010714 MOV #2%,@0HTVEC :;SET UP TRANSMITTER 
004626 012777 000340 010710 MOV 340 ,@DHTLVL sINTERRUPT VECTOR 
004634 012777 010652 MOV » 8OHSCR sSELECT LINE 5 
004642 012777 177777 010654 MOV @-1,@DH8C sSET BYTE COUNT TO 1 
004650 012700 001000 MOV #1000, RO 
004654 012777 010644 MOV #40, ae BIT FOR 
sL 
052777 010624 BIS #61713 ,@0HSCR sSET TRANSMITTER INTERRUPT ENABLE 
064670 7 173102 CLR PS sALLOW INTERRUPTS 
004674 005300 i$: DEC RO sDELAY FOR NPR 
004676 001376 BNE 1$ 
004700 HLT 1 sNO INTERRUPT OCCURED, ERROR 
004700 10 EMT i 
004702 005777 010606 23: TST SOHSCR sVERIFY THAT TRANSMITTER 
sDONE IS SET 
004706 100401 BMI 3$ 
004710 HLT 2 sTRANSMITTER DONE NOT SET, ERROR 
004710 104 EMT 2 
004712 005777 010610 3$: TST SOHBAR sWAS BAR BIT CLEARED FOR LINE 5 
004716 001404 BEQ as 
004720 005005 CLR RS s(RS)*EXPECTED DATA IN 
sBUFFER ACTIVE REGISTER, 0 
004722 017704 010600 MOV SOHBAR ,R4 ;CR4)*ACTUAL CONTENTS OF 
sBUFFER ACTIVE REGISTER 
004726 HLT 0 sBUS ACTIVE BIT NOT CLEARED, ERROR 
004726 104000 EMT 0 
004730 022777 000001 010564 43: CMP #1, 80HBA sWAS BUS ADDRESS INCREMENTED 
004736 001405 BEQ 3$ 
004740 017704 010556 MOV SOHBA, R4 sCR4)*ACTUAL CONTENTS 
ri: ADDRESS MEMORY FOR 
i 
004744 012705 000001 MOV #1,R5 sCRS)=EXPECTED VALUE OF 
sBUS ADDRESS MEMORY FOR 
sLINE 5, 1 
004750 HLT 3 sBUS ADDRESS NOT UPDATED 
004750 104003 EMT 3 
sCORRECTLY, ERROR 
004752 005777 010546 S$: TST S80HBC sDID BYTE COUNT DECREMENT TO 0 
004756 001416 BEG 6$ 
004760 017704 010540 MOV SOHBC ,R4 s(R4)=ACTUAL VALUE OF BYTE 
sCOUNT FOR LINE 5 
004764 005005 CLR RS CRS )*EXPECTED VALUE OF BYTE 
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010350 


010352 


010342 


010540 
010532 


sCOUNT FOR LINE 5, 


HLT a sBYTE COUNT DID NOT. DECREMENT TO 0, ERROR 











ENT 4 
MOV OHRLVL.@DHRVEC -:RESTORE TRAPCATCHER 
CLR @OHRLVL 
MOV DHTLVL .@DHTVEC 
CLR SDHTLVL 
64: MOV @STACK SP sRESTORE STACK 
SCOPE sCHECK FOR ITERATIONS, LOOP 
LIME =-LINE+1 
BITX-BITX+BITX 
\LINE, \BITX 
sNPR LOGIC TEST 
sSET BYTE COUNT TO 1 FOR LINE 6 
sSET BAR BIT FOR 
sDELAY FOR NPR 
sVERIFY THAT BAR BIT FOR LINE 6 CLEARS 
sVERIFY THAT TRANSMITTER DONE IS SET 
TS \XN,20,68 
T16: MOV 4340 ,PS sDISABLE ALL INTERRUPTS 
MOV @20, ICOUNT sSET UP FOR 20 ITERATIONS 
— MOV 06% ,ESCAPE sSET UP TO ESCAPE TO NEXT TEST 
: <> 
mec MOV ®,FREEZ1 sSET UP TO LOOP WITH DATA : 3 
XN*XNo1 
MOV sISSUE MASTER CLEAR 
JSR sCLEAR ALL BUS ADDRESS 
sAND BYTE COUNT MEMORY LOCATIONS 
MOV sSET UP TRANSMITTER 
MOV sINTERRUPT VECTOR 
MOV sSELECT LINE 6 
ae sSET BYTE COUNT TO 1 
MOV sSET BAR BIT FOR 
sLINE 6 
6Is sSET TRANSMITTER INTERRUPT ENABLE 
CLR PS sALLOW INTERRUPTS 
1s; one re sDELAY FOR NPR 
a : sNO INTERRUPT OCCURED, ERROR 
2%: TST @DHSCR sVERIFY THAT TRANSMITTER 
sDONE IS SET 
BMI 3% 
1 : s TRANSMITTER DONE NOT SET, ERROR 
38; ea ae sWAS BAR BIT CLEARED FOR LINE 6 
CLR RS s(RS)*EXPECTED DATA IN 
t REGISTER, 0 
MOV GOHBAR .R4 s(R4)=ACTUAL CONTENTS OF 
sBUFFER ACTIVE REGISTER 
~ . sBUS ACTIVE BIT NOT CLEARED, ERROR 


emer rR A ee eta eR = ER RS SS SSG RS SS A PS SS SSS ES 
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022777 000001 010326 49: CHP «#1. BOMBA ;MAS BUS ADDRESS INCREMENTED 
005174 001405 sEaStiéSS 
005176 017704 010320 MOV SOBA. RA ;(R&*ACTUAL CONTENTS 
1OF BUS ADORESS MEMORY FOR 
3 
005202 012705 000001 MOV s« #1. RS ;(RS)*EXPECTED VALUE OF 
sBUS ADDRESS EMORY FOR 
t 
005206 “rT O3 ‘SUS ADORESS NOT UPDATED 
005206 104008 ENT 8s 
;CORRECTLY, ERROR 
005210 005777 010310 ss; ‘ST ;01D BYTE COUNT DECREMENT To 0 
005214 001416 8EQStsé 
005216 017704 010302 MOV SDHBC.R4 sCR4)°ACTUAL VALUE OF BYTE 
;COUNT FOR LINE 6 
005222 005005 CLR RS ;(RS)*EXPECTED VALUE OF BYTE 
008224 mT 864 IGYIE COUNT GIB SBT DECREMENT TO 
| 0, ERROR 
24 104004 eT 4 
26 016777 010306 010302 MOV - OWRLVL,GDHRVEC RESTORE TRAPCATCHER 
005234 005077 010300 CLR  - SDMRLVL 
005240 016777 010300 010274 MOV —sOMTLVL..@OHTVEC 
005246 005077 010272 CLR —- SDHTLVL 
005252 012706 017270 6: MOV _—s @STACK. SP sRESTORE STACK 
005256 104400 SCOPE sCHECK FOR ITERATIONS, LOOP 
000007 LINE =LINE+1 
000200 BITX=BITX+BITX 
005260 NPRTS  \LINE, \BITX 
_ LOGIC TEST 
BYTE COUNT TO 1 FOR LINE 7 
SSET BAR BIT FOR LINE 7 
;DELAY FOR NPR 
;VERIFY THAT BAR BIT FOR LINE 7 CLEARS 
sVERIFY THAT TRANSMITTER DONE IS SET 
005260 TS \XN, 20,69 
00 012767 000340 172510 117: | MOV 0340, PS sDISABLE ALL INTERRUPTS 
005266 012767 000020 010266 MOV «20, ICOUNT sSET UP FOR 20 ITERATIONS 
005274 012767 005510 010254 == MOV (68 .ESCAPE sSET UP TO ESCAPE TO NEXT TEST 
. <> 
—_ = sSET UP TO LOOP WITH DATA 13 
000020 XN®XNeoL 
012777 004000 010204 HOV 
005310 004767 010106 JSR ADORE SS 
sAND BYTE COUNT MEMORY LOCATIONS 
005314 012777 005376 010220 MOV sSET UP TRANSMITTER 
005322 012777 000340 010214 HOV SINTERRUFT VECTOR 
005330 012777 7 010156 sSELECT LINE 7 
005386 012777 177777 010160 HOV sSET BYTE COUNT TO 1 
012700 061000 HOV 
005350 012777 010150 1SET_BAR GIT FOR 
005356 052777 020000 010130 ers : SET TRANSMITTER INTERRUPT ENABLE 
005364 005067 172406 CLR sé sALLOW INTERRUPTS 
005370 005300 18: C&C 0 SDELAY FOR NPR 











LE SS TT TS SALES IS FS TT SESE DET AST 5 SP I A STSCI TEI ce 8s ONAN SRC 
SEQ 40 | 
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001376 


104001 
005777 


100401 


104002 
005777 
001404 
005005 


017704 


012767 
012767 
012767 


010112 


010114 


010104 


917270 


010070 


010044 
010036 


SNE i$ 
a : sNO INTERRUPT OCCURED, ERROR 
2s: TST 8DHSCR sVERIFY THAT TRANSMITTER 
sDONE IS SET 
BMI 3$ 
a : s TRANSMITTER DONE NOT SET, ERROR 
3$: are _— sWAS BAR BIT CLEARED FOR LINE 7 
CLR R5 3(R5)=EXPECTED DATA IN 
sBUFFER ACTIVE REGISTER, 0 
MOV SOHBAR .R4 s(P4)*ACTUAL CONTENTS OF 
sBUFFER ACTIVE REGISTER 
. : sBUS ACTIVE BIT NOT CLEARED, ERROR 
4$: td  aiteae sWAS BUS ADDRESS INCREMENTED 
MOV BOHBA,R4 3(R4)=ACTUAL CONTENTS 
re ADDRESS MEMORY FOR 
MOV #1,R5 3(RS)=EXPECTED VALUE OF 
aa MEMORY FOR 
3 
- : ;BUS ADDRESS NOT UPDATED 
sCORRECTLY, ERROR 
S$: pid _ :0ID BYTE COUNT DECREMENT TO 0 
MOV SDHBC ,R4 3(R4)=ACTUAL ae OF BYTE 
sCOUNT FOR L 
CLR R5 :(RS)eENPECTED vALUE OF BYTE 
sCOUNT FOR LINE 7, 0 
a ; ;BYTE COUNT DID NOT DECREMENT TO C0, ERROR 
MOV DHRLVL.SDHRVEC ;RESTORE TRAPCATCHER a 
CLR GOHWRLVL 
MOV DHTLVL , @OHTVEC 
CLA SOHTLVL 
63: MOV @STACK ,SP sRESTORE STACK 
sCHECK FOR ITERATIONS. LOOP 
LINE =LINE+1 
BITX=«BITX+BITX 
NPRTS \LINE,\@ITX 


TS \XN,20,68 
MOV 


000340 172252 120: 


000020 010030 
005746 010016 


-IF NB 


Re ES pe, Maes ot ae ee 


sNPR LOGIC TEST 

sSET BYTE COUNT TO 1 FOR LINE 10 

sSET BAR BIT FOR LINE 10 

sDELAY FOR NPR 

sVERIFY THAT BAR BIT FOR LINE 10 CLEARS 
sVERIFY THAT TRANSMITTER DONE IS SET 


sDISABLE ALL INTERRUPTS 
sSET UP FOR 20 ITERATIONS 
;SET UP TO ESCAPE TO NEXT TEST 


0340 ,PS 
MOV $20, ICOUNT 
MOV 06% , ESCAPE 


<> 
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SEQ 41 
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000021 
012777 
004767 


012777 
012777 
012777 
012777 
012700 
012777 


007654 


007656 


007646 


007604 


017270 


007746 


007632 


007606 
007600 


-ENOC 
XN*XNel 


23: 


4$: 


S$: 


6$: 


MOV 


®,FREEZ1 sSET UP TO LOOP WITH DATA ; 3 


661T11,8D0HSCR sISSUE MASTER CLEAR 


PC CLEAR ;CLEAR ALL BUS ADDRESS 
sAND BYTE COUNT MEMORY LOCATIONS 
@2% . BHTVEC ;SET UP TRANSMITTER 
0340 ,ODHTLVL s INTERRUPT VECTOR 
#10, 80HSCR sSELECT LINE 10 
@-1,@0HBC ;SET BYTE COUNT TO 1 
#1000,R0 
0400 , BOHBAR ;SET BAR BIT FOR 
sLINE 10 
6BIT13,80HSCR ;SET TRANSMITTER INTERRUPT ENABLE 
PS sALLOW INTERRUPTS 
rr ;DELAY FOR NPR 
: 3NO INTERRUPT OCCURED, ERROR 
SDHSCR ;VERIFY THAT TRANSMITTER 
- sDONE IS SET 
: ; TRANSMITTER DONE NOT SET, ERROR 
— sWAS BAR BIT CLEARED FOR LINE 10 
R5 s(RS)=EXPECTED DATA IN 
BUFFER ACTIVE REGISTER, 0 
SDHBAR .R4 :(R4)=ACTUAL CONTENT 
sBUFFER ACTIVE REGISTER 
; 3;BUS ACTIVE BIT NOT CLEARED, ERROR 
oo sWAS BUS ADDRESS INCREMENTED 
@OHBA ,R4 :(R4)*ACTUAL CONTENTS 
;0F BUS ADDRESS HEMORY FOR 
sLINE 10 
#1.R5 :(R5)=EXPECTED VALUE OF 
;6US _ MEMORY FOR 
sLINE 10, 1 
: :BUS ADDRESS NOT UPDATED 
sCORRECTLY. ERROR 
> eg ;DID BYTE COUNT DECREMEN” TO 0 
SOHBC ,R4 :(R4)=ACTUAL VALUE OF BYTE 
;COUNT FOR LINE 10 
R5 :(RS)=EXPECTED VALUE OF BYTE 
:COUNT FOR LINE 10, 0 


4 sBYTE COUNT DID NOT DECREMENT TO QO. ERROR 


4 

DHRLVL .@DHRVEC ;RESTORE TRAPCATCHER 
@OHRLVL 

DHTLVL ,@DHTVEC 

SOHTLVL 

@STACK ,SP sRESTORE STACK 


;CHECK FOR ITERATIONS, LOOP 





005754 





000011 
001000 


012767 
012767 
012767 


000022 
012777 
004767 


012777 
012777 
012777 


007416 


007420 


007410 


000001 
007366 


000001 








SEQ 42 
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LINE =LINE+1 
ali Uy 
NPRTS \LINE,\BITX 
;NPR LOGIC TEST 
;SET BYTE CCUNT TO 1 FOR LINE il 
;SET BAR BIT FOR LINE 11 
;DELAY FOR NPR 
;VERIFY THAT BAR BIT FOR LINE 11 CLEARS 
;VERIFY THAT TRANSMITTER DONE IS SET 
TS \XN,20,6$ 
172014 T2i: MOV @340,PS ;DISABLE ALL INTERRUPTS 
007572 MOV 20, ICOUNT ;SET UP FOR 20 ITERATIONS 
007560 ~_— MOV #6$, ESCAPE sSET UP TO ESCAPE TO NEXT TEST 
. <> 
MOV @,FREEZ1 ;SET UP TO LOOP WITH DATA ; 3 
-ENDC 
XN=XNe1 
007510 MOV #681IT11,98DHSCR sISSVE MASTER CLEAR 
JSR PC CLEAR ;CLEAR ALL BUS ADDRESS 
sAND BYTE COUNT MEMORY LOCATIONS 
007524 MOV ;SET UP TRANSMITTER 
007520 MOV s INTERRUPT VECTOR 
007462 MOV sSELECT LINE i1 
007464 a sSET BYTE COUNT TO 1 
007454 MOV wae ae BIT FOR 
3 
007434 BIS $6IT13.8DHSCR ;SET TRANSMITTER INTERRUPT ENABLE 
CLR PS sALLOW INTERRUPTS 
i$: DEC RO ;DELAY FOR NPR 
BNE i3 
_ : sNO INTERRUPT OCCURED. ERROR 
23: TST @DHSCR ;VERIFY THAT TRANSMITTER 
;D0NE IS SET 
BMI 33 
pal : sTRANSMITTER DONE NOT SET. ERROR 
33: 4 _— ;WAS BAR BIT CLEARED FOR LINE 11 
CLR R5 ;(RS)=EXPECTED DATA IN 
;BUFFER ACTIVE REGISTER. 0 
MOV SDHBAR .R4 :(R4&4)=ACTUAL CONTENTS OF 
;BUFFER ACTIVE REGISTER 
a 0 ;BUS ACTIVE BIT NOT CLEARED, ERROR 
007374 4%: ond .— sWAS BUS ADDRESS INCREMENTED 
MOV SDHBA,R4 :C€R4)=ACTUAL CONTENTS 
;0F BUS ADDRESS MEMORY FOR 
sLINE 11 
MOV 61,R5 ;CRS)=EXPECTED VALUE OF 
;BuUS — MEMORY FOR 
;LINE 11, 
HLT 3 ;BUS abbREss NOT UPDATED 


P : eee AOR ES be TPES ARS TE EERE RAS |S em 
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SEQ 43 


MACRO VO4.00 27-JUN-85 12:51:38 PAGE 20-18 


104003 
005777 
001416 
017704 


005005 


012767 
012767 
012767 


012700 


007356 
007350 


007354 
007346 
007346 
007340 
017270 


000340 


007160 


007162 


007350 
007342 


171556 
007334 
007322 


EMT 3 
sCORRECTLY, ERROR 
S$: i 4 _ ;DID BYTE COUNT DECREHMENT TO 0 
MOV @DHBC , R4 s(R4)=ACTUAL VALUE OF BYTE 
sCOUNT FOR LINE 11 
CLR RS sCRS)=EXPECTED VALUE OF BYTE 
sCOUNT FOR LINE 11, 0 
ae ; sBYTE COUNT DID NOT DECREMENT TO 0, ERROR 
MOV DHRLVL ,@DHRVEC ;RESTORE TRAPCATCHER 
CLR SDHRLVL 
MOV DHTLVL ,@DHTVEC 
CLR SOHTLVL 
6$: MOV @STACK , SP sRESTORE STACK 
SCOPE sCHECK FOR ITERATIONS, LOOP 
LINE =LINE+1 
BITX*BITX+BITX 
NPRTS \LINE,\BITX 


TS nee 


T22: 


.IF NB 


.ENDC 
XN=XNel 


i$: 


2$: 


33: 


sNPR LOGIC TEST 

sSET BYTE COUNT TO 1 FOR LINE 12 

;SET BAR BIT FOR LINE 12 

;DELAY FOR NPR 

;sVERIFY THAT BAR BIT FOR LINE 12 CLEARS 
sVERIFY THAT TRANSMITTER DONE IS SET 


#340 ,PS sDISABLE ALL INTERRUPTS 

#20, ICOUNT sSET UP FOR 20 ITERATIONS 

#63 , ESCAPE sSET UP TO ESCAPE TO NEXT TFST 
&,FREEZ1 sSET UP TO LOOP WITH DATA ; 3 


sISSUE MASTER CLEAR 
sCLEAR ALL BUS ADDRESS 


sSET BYTE COUNT TO 1 

5 BAR BIT FOR 

; 

sSET TRANSMITTER INTERRUPT ENABLE 





PS :ALLOW INTERRUPTS 

rr ;DELAY FOR NPR 

: sNO INTERRUPT OCCURED, ERROR 
SO0HSCR sVERIFY THAT TRANSMITTER 

A sDONE IS SET 

2 s TRANSMITTER DONE NOT SET, ERROR 
2 

@OHBAR sWAS BAR BIT CLEARED FOR LINE 12 





—— 





MACRO VO4.00 27-JUN-85 12:51:38 PAGE 20-19 


601404 
CO5005 


017704 


012767 
012767 
012767 


000024 
012777 
004767 


012777 
012777 
012777 


007152 
000001 
007130 


000001 


007120 
007112 


007116 
0 


017270 


000340 
000020 
006700 


004000 
006716 


006566 
000340 
000013 


007136 


007112 
007104 


171320 
007076 
007064 


007014 


007030 
007024 
006766 


BEQ 4$ 
CLR RS 
MOV SOHBAR ,R4 
HLT 0 
EMT 0 
4$: CMP #1,8DHBA 
BEQ 5$ 
MOV @DHBA, R4 
MOV @1,R5 
HLT 3 
EMT 3 
S$: TST 8DHBC 
BEG 6$ 
MOV SOHBC .R4 
CLR RS 
HLT & 
EMT 4 
MOV DHRLVL . 8@DHRVEC 
CLR SOHRLVL 
MOV DHTLVL , @DHTVEC 
CLR SDHTLVL 
6$: MOV @STACK ,SP 
OPE 
LINE=LINE+1 
BITX=*BITX+BITX 
NPRTS \LINE,\BITX 


sNPR LOGIC TEST 
sSET BYTE COUNT TO 1 FOR LINE 13 


:SET BAR BIT FOR LINE 13 


sDELAY FOR NPR 
sVERIFY THAT BAR BIT FOR LINE 13 CLEARS 
sVERIFY THAT TRANSMITTER DONE IS SET 


TS \XN,20,6$% 
T23: 
IF NB <> 


-ENOC 
XN=XN+1 


#,FREEZ1 
#81T11,8DHSCR 
PC CLEAR 
#2$,@DHTVEC 


#340 , @OHTLVL 
#13, 80HSCR 








;CRS)=EXPECTED DATA IN 

sBUFFER ACTIVE REGISTER, 0 
sCR4)=ACTUAL CONTENTS OF 

sBUFFER ACTIVE REGISTER 

sBUS ACTIVE BIT NOT CLEARED, ERROR 


sWAS BUS ADDRESS INCREMENTED 


;CR4)=ACTUAL CONTENTS 

;0F BUS ADDRESS MEMORY FOR 
sLINE 12 

s(RS)*EXPECTED VALUE OF 
s6BUS ADDRESS MEMORY FOR 
sLINE 12, 1 

sBUS ADDRESS NOT UPDATED 


sCORRECTLY, ERROR 
sDID BYTE COUNT DECREMENT TO 0 


3(R4)=*ACTUAL VALUE OF BYTE 

sCOUNT FOR LINE 12 

s(RS)=EXPECTED VALUE OF BYTE 

sCOUNT FOR LINE 12, 0 

sBYTE COUNT DID NOT DECREMENT TO 0, ERROR 


sRESTORE TRAPCATCHER 


sRESTORE STACK 
;CHECK FOR ITERATIONS, LOOP 


sDISABLE ALL INTERRUPTS 
SET UP FOR 20 ITERATIONS 
;SET UP TO ESCAPE TO NEXT TEST 


sSET UP TO LOOP WITH DATA ; 3 


sISSUE MASTER CLEAR 
sCLEAR ALL BUS ADDRESS 

sAND BYTE COUNT MEMORY LOCATIONS 
sSET UP TRANSMITTER 

sINTERRUPT VECTOR 
sSELECT LINE 13 
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012777 
012700 
012777 


177777 
001000 
004000 


0200006 
171216 


006722 


006724 


006714 


44 
017270 


006770 
006760 
006740 


006700 


006654 
006646 


MOV G- i . SCHBC 
MOV #1000,R0 
MOV #4000, SDHBAR 
BIS #681T13,98DHSCR 
CLR PS 
1%: DEC RO 
BNE i$ 
HLT i 
EMT 1 
2s: TST @DHSCR 
BMI 3$ 
HLT 2 
EMT 2 
3%: TST SD0HBAR 
BEQ 4 
CLR 
MOV SDHBAR ,R4 
HLT 0 
EMT 0 
4$: CMP #1 ,8DHBA 
BEQ 5$ 
MOV SDHSA, R4 
MOV $1,R5 
HLT 3 
EMT 3 
53: TST SD0HBC 
BEQ 6$ 
MOV SOHBC ,R4 
CLR RS 
HLT 4 
EMT 
MOV 
CLR SDHRLVL 
MOV DHTLVL ,@DHTVEC 
CLR SOHTLVL 
6$: MOV #STACK ,SP 
SCOPE 
LINE =LINE+1 
BITX=BITX+BITX 
NPRTS \LINE, \BITX 


sSET BYTE COUNT TO 1 


;SET BAR BIT FOR 

sLINE 13 

;SET TRANSMITTER INTERRUPT ENABLE 
RRUPTS 


;ALLOW INTE 
sDELAY FOR NPR 


sNO INTERRUPT OCCURED, ERROR 


sVERIFY THAT TRANSMITTER 
sDONE IS SET 


; TRANSMITTER DONE NOT SET, ERROR 
sWAS BAR BIT CLEARED FOR LINE 13 


;CRS)*EXPECTED DATA IN 
sBUFFER ACTIVE REGISTER, 0 
;CR4)=ACTUAL CONTENTS OF 
;BUFFER ACTIVE REGISTER 
sBUS ACTIVE BIT NOT CLEARED, ERROR 


sWAS BUS ADDRESS INCREMENTED 


:CR4)=ACTUAL CONTENTS 
;0F BUS ADDRESS MEMORY FOR 
LINE 13 


i 
;(RSJ*EXPECTED VALUE OF 
;BUS ADDRESS MEMORY FOR 


LINE 13, 


2 
sBUS ADDRE 


i 
SS NOT UPDATED 


sCORRECTLY, ERROR 


;D1D BYTE COUNT DECREMENT TO 0 


3CR4)=ACTUAL VALUE OF BYTE 
INE 1 


sCOUNT FOR 


L 
sCRS)*EXPECTED VALUE OF BYTE 
sCOUNT FOR LINE 13, 0 


sBYTE COUNT DID NOT DECREMENT TO 0, ERROR 


4 
DHRLVL,@DHRVEC ;RESTORE TRAPCATCHER 


sNPR LOGIC TEST 
sSET BYTE COUNT TO 1 FOR LINE 14 


;SET BAR BIT FOR LINE 14 


sDELAY FOR NPR 
;VERIFY THAT BAR BIT FOR LINE 14 CLEARS 





sRESTORE STACK 
sCHECK FOR ITERATIONS, LOOP 





SEQ 45 


a 
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;VERIFY THAT TRANSMITTER DONE IS SET 
006706 TS \XN,20,6$ 
006706 012767 000340 171062 124: MOV $340 ,PS ;DISABLE ALL INTERRUPTS 
006714 012767 000020 006640 MOV $20, ICOUNT ;SET UP FOR 20 ITERATIONS 
006722 012767 007136 006626 — MOV 66% ,ESCAPE ;SET UP TO ESCAPE TO NEXT TEST 
% <> 
une MOV ¢,FREEZ1 ;SET UP TO LOOP WITH DATA ; 3 
000025 XN=XNel 
006730 012777 004000 006556 MOV #81T11,8DHSCR ;ISSUE MASTER CLEAR 
006736 004767 006460 JSR PC CLEAR ;CLEAR ALL BUS ADDRESS 
;AND BYTE COUNT MEMORY LOCATIONS 
006742 012777 007024 006572 MOV #2%$, BDHTVEC ;SET UP TRANSMITTER 
006750 012777 000340 006566 MOV #340 , BDHTLVL s INTERRUPT VECTOR 
006756 012777 000014 006530 MOV #14, 8DHSCR ;SELECT LINE 14 
006764 012777 177777 006532 MOV #-1,8DHBC ;SET BYTE COUNT TO i 
006772 012700 001000 MOV #1000,R0 
006776 012777 010000 006522 MOV #10000 , @OHBAR 5 BIT FOR 
5 
007004 052777 020000 006502 BIS @6IT13,8DHSCR ;SET TRANSMITTER INTERRUPT ENABLE 
007912 005067 170760 CLR PS sALLOW INTERRUPTS 
007016 005300 1$: DEC RO sDELAY FOR NPR 
067020 001376 BNE i$ 
007022 HLT 1 sNO INTERRUPT OCCURED, ERROR 
007022 104001 EMT i 
007024 005777 006464 2s: TST SDHSCR ;VERIFY THAT TRANSMITTER 
;DONE IS SET 
007030 100401 BMI 3$ 
007032 HLT 2 ; TRANSMITTER DONE NOT SET, ERROR 
007032 EMT 2 
007034 005777 006466 3$: TST 80HBAR ;WAS BAR BIT CLEARED FOR LINE 14 
007040 901404 BEQ 43 
007042 CLR RS ;(RS)=EXPECTED DATA IN 
sBUFFER ACTIVE REGISTER, 0 
007044 017704 006456 MOV SDHBAR ,R4 ;(R4)=ACTUAL CONTENTS OF 
sBUFFER ACTIVE REGISTER 
007050 HLT 0 ;BUS ACTIVE BIT NOT CLEARED, ERROR 
007050 EMT 0 
007052 022777 000001 006442 4$: CMP #1,8DHBA ;WAS BUS ADDRESS INCREMENTED 
007060 001405 BEQ 5$ 
007062 017704 006434 MOV SOHBA, R4 3CR4)*ACTUAL CONTENTS 
;0F BUS ADDRESS MEMORY FOR 
sLINE 14 
007066 012705 000001 MOV #1,R5 :CRS)*EXPECTED VALUE OF 
3;BUS aT MEMORY FOR 
;LINE 14, 1 
007072 HLT 3 sBUS ADDRESS NOT UPDATED 
007072 104003 EMT 3 
:CORRECTLY, ERROR 
007074 005777 0C6424 5$: TST SOHBC ;DID BYTE COUNT DECREMENT TO 0 
007100 001416 BEQ 6$ 
007102 017704 006416 MOV SOHBC , R4 ;CR4)*ACTUAL VALUE OF BYTE 
;COUNT FOR LINE 14 
007106 005005 CLR RS ;CRS )=EXPECTED — OF BYTE 
:COUNT FOR LINE 0 
007110 HLT é iBYTE COUNT DID No DECREMENT TO 0, ERROR 





CZDKC -CO 


‘ees 


012767 
012767 
012767 





06 
017270 


000340 
000020 
007374 


006226 


006230 
006220 


000001 








a 
006416 MOV DHRLVL.@DHRVEC ;RESTORE TRAPCATCHER 
CLR HRLVL 
006410 MOV DHTLVL , @OHTVEC 
CLR SDHTLVL 
6$: MOV @STACK ,SP sRESTORE STACK 
SCOPE ;CHECK FOR ITERATIONS, LOOP 
LINE =LINE+1 
BITX=BITX+BITX 
NPRTS \LINE , \BITX 
;NPR LOGIC TEST 
;SET BYTE COUNT TO 1 FOR LINE 15 
:SET BAR BIT SOR LINE 15 
;DELAY FOR NPR 
;VERIFY THAT BAR BIT FOR LINE 15 CLEARS 
;VERIFY THAT TRANSMITTER DONE IS SET 
TS \XN,20,6$% 
170624 T25: MOV 0340 .PS ;DISABLE ALL INTERRUPTS 
006402 MOV $20, ICOUNT ;SET UP FOR 20 ITERATIONS 
006370 payee MOV 46%, ESCAPE ;SET UP TO ESCAPE TO NEXT TEST 
< <> 
MOV @,FREEZ1 sSET UP TO LOOP WITH DATA ; 3 
-ENDC 
XN2=XNel 
006320 MOV sISSUE MASTER CLEAR 
JSR ;CLEAR ALL BUS ADDRESS 
;AND BYTE COUNT MEMORY LOCATIONS 
006334 MOV sSET UP 
006330 MOV s INTERRUPT Pte 
006272 MOV ;SELECT LINE 1 
006274 cae 3SET BYTE COUNT TO i 
006264 MOV 3SET BAR BIT FOR 
sLINE 15 
006244 BIs sSET TRANSMITTER INTERRUPT ENABLE 
CLR BS sALLOW INTERRUPTS 
is: oo re sDELAY FOR NPR 
os sNO INTERRUPT OCCURED. ERROR 
2$: TST @OHSCR ;VERIFY THAT TRANSMITTER 
sDONE IS SET 
BMI 3% 
pa : ; TRANSMITTER DONE NOT SET. ERROR 
33: ua > eae ;WAS BAR BIT CLEARED FOR LINE i5 
CLR RS 3CRS)*EXPECTED DATA IN 
sBUFFER ACTIVE REGISTER, 0 
MOV SOHBAR ,R4 :(R4) ACTUAL 
;BUFFER ACTIVE REGISTER 
ld 0 ;BUS ACTIVE BIT NOT CLEARED, ERROR 
006204 4%: CMP os ee ;WAS BUS ADDRESS INCREMENTED 








SEQ 48 
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007320 017704 006176 MOV SDHBA , R4 ;(R4)*ACTUAL CONTENTS 
i ig eee MEMORY FOR 
’ 
007324 012705 000001 MOV #1,R5 ee paaeec lee VALUE OF 
US ADDRESS MEMORY FOR 
PONE im, 
007330 HLT 3 ;BUS ADDRESS NOT UPDATED 
007330 104003 EMT 3 
;CORRECTLY. ERROR 
007332 005777 006166 S$: TST @0HBC sDID BYTE COUNT DECREMENT TO 0 
007336 001416 BEQ 4 
007340 017704 006160 MOV SDHBC ,R4 ;CR4)=ACTUAL VALUE OF BYTE 
sCOUNT FOR LINE 15 
007344 005005 CLR RS ;(RS)-EXPECTED VALUE OF BYTE 
sCOUNT FOR LINE 15, 0 
a oh : sBYTE COUNT DID NOT DECREMENT TO 0, ERROR 
007350 016777 006164 006160 MOV DHRLVL ,@DHRVEC ,;RESTORE TRAPCATCHER 
007356 005077 006156 CLR SDHRLVL 
007362 016777 006156 006152 MOV DHTLVL .@DHTVEC 
007370 005077 006150 CLR LVL 
007374 012706 017270 6$: MOV @STACK ,SP sRESTORE STACK 
007400 104400 sc sCHECK FOR ITERATIONS, LOOP 
000016 LINE =LINE+1i 
040000 BITX=BITX+BITX 
007402 NPRTS \LINE,\BITX 
sNPR LOGIC TEST 
sSET BYTE COUNT TO 1 FOR LINE 16 
;SET BAR BIT FOR 
sDELAY FOR NPR 
sVERIFY THAT BAR BIT FOR LINE 16 CLEARS 
sVERIFY THAT TRANSMITTER DONE IS SET 
007402 TS \XN,20,68 
007 012767 000340 170366 T26: MOV $340 ,.PS ;DISABLE ALL INTERRUPTS 
007410 012767 006144 MOV @20, ICOUNT sSET UP FOR 20 ITERATIONS 
007416 012767 007632 006132 ws MOV 46% , ESCAPE :SET UP TO ESCAPE TO NEXT TEST 
g <> 
MOV @,FREEZ1 ;SET UP TO LOOP WITH DATA : 3 
-ENDC 
7 XN=XNel 
007424 012777 604000 006062 MOV #68IT11.,@DHSCR sISSUE MASTER CLEAR 
007432 004767 005764 JSR PC .CLEAR ;CLEAR ALL BUS ADDRESS 
;AND BYTE COUNT MEMORY LOCATIONS 
007436 012777 007520 006076 MOV €2%,@DHTVEC 3SET UP TRANSMITTER 
007444 012777 000340 006072 MOV €340,,@DHTLVL sINTERRUPT VECTOR 
007452 012777 000016 006034 MGV #16, SDHSCR SSELECT LINE 16 
007460 012777 177777 006036 MOV $-1, @DHBC :SET BYTE COUNT TO 1 
007466 012700 001000 MOV #1000, R0 
007472 012777 0000 006026 MOV #40000 , SOHBAR ne a” BIT FOR 
3 
007500 052777 9020000 006006 BIS #B81IT13,@0HSCR ;SET TRANSMITTER INTERRUPT ENABLE 
007506 005067 170264 CLR PS sALLOW INTERRUPTS 
007512 005300 i$: DEC RO ;DELAY FOR 
007514 001376 BNE is 
007516 HLT i 3NO INTERRUPT OCCURED, ERROR 
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104001 
005777 


100401 


104002 
005777 
001404 
005005 


017704 


104000 
022777 
001405 
017704 


012705 


012767 
012767 
012767 


005770 


005772 
005762 


000001 
005740 


000001 


005730 
005722 


00 
017270 


000340 170130 T27: 


000020 
010070 


005746 


005722 
005714 


005706 
005674 





2s: TST 


3$: TST 


4$; 


5$: TST 


6$: 


i 
SDHSCR 


3$ 
2 


2 

SDHBAR 

43 

RS 

SOHBAR .R4 
0 

0 

#1, 8DHBA 
S$ 
SOHBA,R4 


#1,R5 


LINE «LINE +i 
BITX=BITX+BITX 
NPRTS \LINE 


ITx 


;NPR LOGIC 


TEST 
SET BYTE COUNT TO 1 ro LINE 17 


sSET BAR BIT FOR L 
FOR NPR 


;DELAY 





SEQ 49 


;VERIFY THAT TRANSMITTER 
;DONE IS SET 


; TRANSMITTER DONE NOT SET, ERROR 


sWAS BAR BIT CLEARED FOR LINE 16 


;(RS5)*EXPECTED DATA IN 

sBUFFER ACTIVE REGISTER, 0 
:(R4)=ACTUAL CONTENTS OF 

sBUFFER ACTIVE REGISTER 

;BUS ACTIVE BIT NOT CLEARED, ERROR 


sWAS BUS ADDRESS INCREMENTED 


;(R4)=ACTUAL CONTENTS 
3; 0F ov MEMORY FOR 


sL 1 

:CRS)*EXPECTED VALUE OF 
;BUS omy MEMORY FOR 
sLINE 16, 

;BUS ADDRESS NOT UPDATED 


sCORRECTLY, ERROR 
:DID BYTE COUNT DECREMENT TO 0 


sCR4)*ACTUAL VALUE OF BYTE 
sCOUNT FOR LINE £6 

sCRS)*EXPECTED VALUE OF BYTE 
sCOUNT FOR LINE 16, 0 

:BYTE COUNT DID NOT DECREMENT TO 0. 


sRESTORE TRAPCATCHER 


sRESTORE STACK 
sCHECK FOR ITERATIONS, LOOP 


sVERIFY THAT BAR BIT FOR oe Se 17 ps 


sVERIFY THAT TRANSMITTER 


TS \XN,20,6$ 


.1F NB <> 
-ENDC 


#340,PS 
$20, ICOUNT 
#6$ , ESCAPE 


@,FREEZ1 





sDISABLE ALL INTERRUPTS 
sSET UP FOR 20 ITERATIONS 
sSET UP TO ESCAPE TO NEXT TEST 


sSET UP TO LOOP WITH DATA 


crrOR 





— 


CZDHC -CO 
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000030 
012777 


004757 
012777 


005532 


005534 
005524 


000001 
005502 


000001 


005472 
005464 


005470 
005462 
005462 
005454 
017270 


005624 
005640 
005634 
005576 
005600 
005570 
005550 


005510 


005464 
005456 


XN=XNel1 
MOV $61T11.,8DHSCR 
JSR PC CLEAR 
MOV 62% , SDHT VEC 
MOV #340 , SDHTLVL 
MOV #17,@8DHSCR 
MOV 4-1, 8DHBC 
MOV #1000,R0 
MOV #100000, @DHBAR 
BIS #81T13.@DHSCR 
CLe PS 
13: DEC RO 
BNE 13 
HLT 1 
EMT 
2s: TST @DHSCR 
BMI 33 
HLT 2 
EMT 
38: TST @DHBAR 
BEQ 4 
CLR 
MOV SOHBAR ,R4 
HLT 0 
EMT 
4$; CMP #1 ,8DHBA 
BEQ 5$ 
MOV SOHBA,R4 
MOV 01,R5 
HLT 3 
EMT 3 
53; TST SDHBC 
BEQ 6$ 
MOV SOHBC ,R4 
CLR R5 
HLT & 
EMT 4 
MOV OHRL VL . BDHRVEC 
CLR SOHRLVL 
MOV OHTLVL . @DHTVEC 
CLR SOHTLVL 
LINE =LINE+1 
BITX=BITX+BITX 





;ISSUE MASTER CLEAR 

;CLEAR ALL BUS ADDRESS 

sAND BYTE COUNT MEMORY LOCATIONS 
;SET UP TRANSMITTER 

s INTERRUPT VECTOR 

sSELECT LINE 17 

;SET BYTE COUNT TO 1 


;SET BAR BIT FOR 

s;LINE 17 

;SET TRANSMITTER INTERRUPT ENABLE 
sALLOW INTERRUPTS 

;DELAY FOR NPR 


sNO INTERRUPT OCCURED, ERROR 


sVERIFY THAT TRANSMITTER 
;DONE IS SET 


; TRANSMITTER DONE NOT SET, ERROR 
sWAS BAR BIT CLEARED FOR LINE 17 

3(RS)=EXPECTED DATA IN 

sBUFFER ACTIVE REGISTER, 0 


;CR4)=ACTUAL CONTENTS OF 
sBUFFER ACTIVE REGISTER 





SEQ 50 


sBUS ACTIVE BIT NOT CLEARED, ERROR 


sWAS BUS ADDRESS INCREMENTED 


3(R4)2ACTUAL CONTENTS 

;0F BUS ADDRESS MEMORY FOR 
sLINE 17 

:(RS)*EXPECTED VALUE OF 
sBUS ADDRESS MEMORY FOR 
sLINE 17, 1 

;BUS ADDRESS NOT UPDATED 


sCORRECTLY, ERROR 
sDID BYTE COUNT DECREMENT TO 0 


sCR4)=ACTUAL VALUE OF BYTE 
sCOUNT FOR LINE 17 

CRS )*EXPECTED _ OF BYTE 
sCOUNT FOR 0 


sRESTORE TRAPCATCHER 


sRESTORE STACK 
sCHECK FOR ITERATIONS, LOOP 


LINE 
sEYTE COUNT DID NOT DECREMENT TO 0, ERROR 








‘a 


010076 


010176 
0202 
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004767 


177777 


005326 
005320 
005306 


167672 
005450 
005436 


LINE =_INE+1 
BITX-BITX+BITX 
-LIST 


-ENOR 
WPRTS2 \LINE, \BITX 


sNPR LOGIC TEST 
sSET BYTE COUNT ON ALL LINES TO 1 

sSET BAR BIT FOR LINE 0 

sVERIFY THAT BYTE COUNT FOR LINE 0 GOES TO 0 
sVERIFY THAT BUS ADDRESS FOR LINE 0 IS INC 


TS \XN,10,8% 
T30: MOV 


iF NB 
-ENOC 


XN=XNel 


43; 


MOV 
MOV 
<> 


MOV 


& 3 


~ 
ass 





BPL 
MOV 
CLR 
CLR 
MOV 
CLR 
MOV 
MOV 
CMP 
BNE 
CLR 
INC 
CMP 
BEQ 
MLT 
EMT 
CMP 
BEQ 
HLT 








PC CLEAR 





REMENTED 
sVERIFY THAT BYTE COUNTS AND BUS ADDRESSES FOR ALL OTHER LINES 
UNCHANGED 


sDISABLE ALL INTERRUPTS 
sSET UP FOR 10 ITERATIONS 
sSET UP TO ESCAPE TO NEXT TEST 


sSET UP TO LOOP WITH DATA 
sMASTER CLEAR INTERFACE 


TIONS 





SEQ 51 


ADDRESS MEMORY LOCA 
SET ALL BYTE as TO -1 


;SET BAR BIT F 
sWAIT FOR TRANSMITTER DONE 


sSET UP TO CHECK ALL 16 LINES 
SSTART AT LINE 0 
NUMBER 


sKEEP TRACK LINE 
CRS) °EXPECTED BYTE COUNT, 
LINE NUMBE T2090 








BUS ADDRES 
sIF LINE BEING COMPARED IS LINE 0 
sEXPECTED BYTE COUNT=0 
sEXPECTED BUS ADDRESS = 1 
‘1S BYTE COUNT CORRECT 
sBYTE COUNT ERROR 
sIS BUS ADDRESS CORRECT 
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104003 
005277 
005201 
005500 
001350 
1 

000002 


012767 
012767 
012767 


000032 
012777 
004767 


000020 
005162 


005216 


005212 


000001 











EMT 3 
74: _ - sPREPARE TO CHECK NEXT LINE 
ae = sCONTINUE IF ALL NOT DONE 
84: ;CHECK FOR ITERATIONS, LOOP 
LINE =LINE+1 
BITX-BITX+BITX 
WPRTS2 \LINE, \ITX 
sNPR LOGIC TEST 
sSET BYTE COUNT ON ALL LINES TO 1 
sSET BAR BIT FOR LINE 
sVERIFY THAT BYTE COUNT FOR LINE 1 GOES TO 0 
sVERIFY THAT BUS ADDRESS FOR LINE 1 IS INCREMENTED 
sVERIFY THAT BYTE COUNTS AND BUS ADDRESSES FOR ALL OTHER LINES 
sARE UNCHANGED 
TS \XN,10,8% 
TSi: MOV #340 ,PS sDISABLE ALL INTERRUPTS 
MOV #10, ICOUNT sSET UP FOR 10 ITERATIONS 
— MOV 08%, ESCAPE sSET UP TO ESCAPE TO NEXT TEST 
, <> 
MOV #,FREEZ1 sSET UP TO LOOP WITH DATA 
-ENDC 
XN@XNol 
MOV #8IT11.8DHSCR sMASTER Ong INTERFACE 
3TO0 SET ALL TBMT BITS 
JSR PC ,CLEAR sCLEAR ALL BYTE COUNT AND 
3B SS MEMORY LOCATIONS 
JSR PC ,LOAD sSET ALL BYTE COUNT LOCATIONS TO 
MOV ° 3SET BAR BIT FOR L 
38: pay - sWAIT FOR TRANSMITTER DONE 
MOV 420,R0 sSET UP TO CHECK ALL 16 LINES 
CLR LINE 0 
CLR Ri 
43; MOV 
CLR 
MOV 
MOV ADORESS 
oe Ti sIF LINE BEING COMPARED IS LINE i 
CLR RS sEXPECTED BYTE COUNT=0 
INC RS sEXPECTED BUS ADDRESS = 1 
S$: . ea iTS BYTE COUNT CORRECT 
on ; sBYTE COUNT ERROR 
6: ore ne sIS BUS ADDRESS CORRECT 
A : sB8US ADDRESS ERROR 
78: 3 ao sPREPARE TO CHECK NEXT LINE 


- - 


CZOMC -CO 


010410 
010412 
010414 


010416 
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005300 
001350 
104400 
000002 


000004 


012767 
012767 
012767 


000033 
012777 


004767 


000020 
005012 


177777 


004736 


005046 


005042 








———_ 


SEQ 53 





DEC RO ;CONTINUE IF ALL NOT DONE 
83: SCOPE sCHECK FOR ITERATIONS, LOOP 
LINE *LIWE+1 
BITX=BITX+BITX 
NPRTS2 \LINE, \BITX 
;NPR LOGIC TEST 
:SET BYTE COUNT ON ALL LINES 10 1 
:SET BAR BIT FOR LINE 2 
sVERIFY THAT BYTE COUNT FOR LINE 2 GOES TO 0 
sVERI©Y THAT BUS ADDRESS FOR LINE 2 IS INCREMENTED 
sVERIFY THAT BYTE COUNTS AND BUS ADDRESSES FOR ALL OTHER LINES 
sARE UNCHANGED 
TS \XN,10,8$ 
T32: MOV @340,PS ;DISABLE ALL INTERRUPTS 
MOV #10, ICOUNT sSET UP FOR 10 ITERATIONS 
— MOV 08%, ESCAPE ;SET UP TO ESCAPE TO NEXT TEST 
. <> 
MOV @,FREEZI sSET UP TO LOOP WITH DATA 3 3 
.ENDC 
XN=XNeol 
MOV #61711, 8DHSCR 
JSR PC.CLEAR 
JSR PC,.LOAD -1 
MOV ‘ 
33: TST 
BPL 33 
MOV #20, R0 
CLR 
CLR Ri 
4$: MOV #-1,.85 
CLR R3 
MOV 
MOV 
- ;IF LINE BEING COMPARED IS LINE 2 
CLR sEXPECTED BYTE COUNT=0 
INC sEXPECTED BUS ADDRESS = 1 
S$: oe ;IS BYTE COUNT CORRECT 
Hi :BYTE COUNT ERROR 
6$: oad :IS BUS ADDRESS CORRECT 
a. ; ;BUS ADDRESS ERROR 
73: TNC SOHSCR ;PREPARE TO CHECK NEXT LINE 
DEC RO ;CONTINUE IF ALL NOT DONE 
BNE 43 


CHECK FOR ITERATIONS, LOOP 





010566 








| TEES, SNE TEETER. AED ren ene ee 
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000003 
000010 


012767 
012767 
012767 


000034 
012777 


004767 


004000 
004600 
004626 
000010 
004654 


000020 
004642 


177777 


167202 
004760 
004746 


004676 


004672 





LINE *LINE+1 


Mae Bly 
NPRTS2 


\LINE, \BITX 


sNPR LOGIC TEST 

;SET BYTE COUNT ON ALL LINES TO 1 

;SET BAR BIT FOR LINE 3 

sVERIFY THAT BYTE COUNT FOR LINE 3 GOES TO 0 

sVERIFY THAT BUS ADDRESS FOR LINE 3 IS INCREMENTED 

:VERIFY THAT BYTE COUNTS AND BUS ADDRESSES FOR ALL OTHER LINES 
sARE UNCHANGED 





TS \XN,10, 88 
T33: MOV @340,PS ;DISABLE ALL INTERRUPTS 
MOV #10, ICOUNT ;SET UP FOR 10 ITERATIONS 
— MOV 08% ,ESCAPE ;SET UP TO ESCAPE TO NEXT TEST 
‘ <> 
MOV @,FREEZ1 sSET UP TO LOOP WITH DATA 
-ENDC 
XN=XNel 
MOV @61T11,8DHSCR sMASTER CLEAR INTERFACE 
370 SET ALL TBMT BITS 
JSR PC .CLEAR sCLEAR ALL BYTE COUNT AND 
:BUS SS MEMORY LOCATIONS 
JSR PC ,.LOAD ;SET ALL BYTE COUNT LOCATIONS To 
MOV #10, SOHBAR :SET BAR BIT FOR L 
33: Li . CR ;WAIT FOR TRANSMITTER DONE 
MOV @20,R0 ;SET UP TO CHECK ALL 16 LIMES 
CLR SOHSCR sSTART AT LINE © 
CLR Ri sKEEP TRACK OF L Tae NUMBER 
4$: MOV @-1,R5 3(R5)-EXPECTED BYTE COUNT, 
;IF LINE NUMBER NOT = 3 
CLR ES s(R3)*EXPECTED BUS ADDRESS. 
sIF LINE NUMBER NOT = 3 
MOV ;(R4)=ACTUAL BYTE ACOUNT 
MOV ;CRS)=ACTUAL BUS ADDRESS 
ae sIF LINE BEING COMPARED IS LINE 3 
CLR sEXPECTED BYTE COUNT=0 
INC sEXPECTED BUS ADDRESS = 1 
53: Ka :IS BYTE COUNT CORRECT 
a sBYTE COUNT ERROR 
6$: aot > fated :IS BUS ADDRESS CORRECT 
ace : ;BUS ADDRESS ERROR 
78: on oo ;PREPARE TO CHECK NEXT LINE 
oo ei :CONTINUE IF ALL NOT DONE 
&$: SCOPE ;CHECK FOR ITERATIONS, LOOP 
LINE =LINE+1 
BITX=BITX+BITX 


NPRTS2 \LINE,\BITX 





SEQ 54 

















SEQ 55 
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sNPR LOGIC TEST 
;SET BYTE COUNT ON ALL LINES TO 1 
;SET BAR BIT FOR LINE 4 
;VERIFY THAT BYTE COUNT FOR LINE 4 GOES TO © 
;VERIFY THAT BUS ADDRESS FOR LINE 4 IS INCREMENTED 
sVERIFY THAT BYTE COUNTS AND BUS ADDRESSES FOR ALL OTHER LINES 
;ARE UNCHANGED 
010736 TS \XN,10,8$ 
020736 012767 000340 167032 134: MOV #340 PS ;sDISABLE ALL INTERRUPTS 
010744 012767 000010 004610 MOV #10, ICOUNT ;SET UP FOR 10 ITERATIONS 
0:0752 0532767 011104 004576 — MOV 083 ,ESCAPE sSET UP TO ESCAPE TO NEXT TEST 
, <> 
— MOV @,FREEZI1 sSET UP TO LOOP WITH DATA s J 
000035 XN=XNel 
010760 012777 004000 004526 MOV @BIT11,8DHSCR sMASTER CLEAR INTERFACE 
;T0 SET ALL TBMT BITS 
010766 004767 004430 JSR PC CLEAR ;CLEAR ALL BYTE COUNT AND 
sBUS ADDRESS MEMORY LOCATIONS 
010772 004767 004456 JSR PC LOAD sSET ALL BYTE COUNT LOCATIONS TO -1 
010776 012777 9000020 004522 MOV 20, SDHBAR sSET BAR BIT FOR LINE 
011004 005777 004504 3$: TST Cr sWAIT FOR TRANSMITTER DONE 
011010 100375 BPL 3$ 
011012 012700 000020 MOV #20,R0 sSET UP TO CHECK ALL 16 LINES 
011016 005077 004472 CLR sSTART AT LINE O 
011022 005001 CLR Ri sKEEP TRACK OF ime NUMBER 
011024 612705 177777 43: MOV @-1,R5 ;(R5)*EXPECTED BYTE COUNT, 
sIF LINE NUMBER NOT = 4 
011030 005003 CLR R3 3(R3)=EXPECTED BUS ADDRESS, 
sIF LINE NUMBER NOT = 4 
011032 617704 004466 MOV SDHBC .R4 3(R4)=ACTUAL BYTE ACOUNT 
011036 017702 004460 MOV @DHBA, R2 ;(RS)=ACTUAL BUS ADDRESS 
011042 027727 004446 000004 CMP SDHSCR , 04 ;IF LINE BEING COMPARED IS LINE 4 
011050 001002 BNE 5$ 
011052 005005 CLR RS sEXPECTED BYTE COUNT=0 
011054 005203 INC RS sEXPECTED BUS ADDRESS = 1 
011056 020504 5$: CMP RS .R4 ;1S BYTE COUNT CORRECT 
011060 001401 BEQ 6$ 
011062 HLT 4 ;BYTE COUNT ERROR 
011062 104004 EMT 
011064 020302 6$: CMP R3,R2 :IS BUS ADDRESS CORRECT 
011066 001401 BEQ 7$ 
011070 HLT 3 ;BUS ADDRESS ERROR 
011070 104003 EMT 3 
011072 005277 004416 7$: INC SDHSCR sPREPARE TO CHECK NEXT LINE 
011076 005201 INC Ri 
011100 005300 DEC RO ;CONTINUE IF ALL NOT DONE 
011102 001350 BNE 4s 
011104 104400 8$: SCOPE ;CHECK FOR ITERATIONS, LOOP 
000005 LINE =LINE+1 
000040 BITX=BITX+BITX 
011106 NPRTS2 \LINE,\BITX 


SR CR EN a BS Te ee 


sNPR LOGIC TEST 


S 
sSET BYTE COUNT ON ALL LINES TO 1 





~~ «— 


rN 
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;SET BAR BTT FOR LINE 5 
;VERIFY THAT BYTE COUNT FOR LINE 5 GOES TO 0 
sVERIFY THAT BUS ADDRESS FOR LINE 5 IS INCREMENTED 
;VCRIFY THAT BYTE COUNTS AND BUS ADDRESSES FOR ALL OTHER LINES 
;ARE UNCHANGED 
011106 TS \XN,10,8$ 
011106 012767 000340 166662 T35: MOV 0340 ,PS sDISABLE ALL INTERRUPTS 
011114 012767 000010 004440 MOV #10, ICOUNT ;SET UP FOR 10 ITERATIONS 
011122 012767 911254 004426 — MOV 68%, ESCAPE ;SET UP TO ESCAPE TO NEXT TEST 
. <> 
“an MOV ®,FREEZ1 ;SET UP TO LOOP WITH DATA ea 
000036 XN=XNe1 
011130 012777 004000 004356 MOV @BIT11,@8DHSCR sMASTER CLEAR INTERFACE 
370 SET ALL TBMT BITS 
011136 004767 004260 JSR PC ,CLEAR ;CLEAR ALL BYTE COUNT AND 
;BUS ADDRESS MEMORY LOCATIONS 
011142 004767 004306 JSR PC ,.LOAD ;SET ALL BYTE COUNT LOCATIONS TO -1 
011146 012777 004352 MOV #40, SOHBAR ;SET BAR BIT FOR LINE 5 
011154 005777 004334 38: TST CR sWAIT FOR TRANSMITTER DONE 
011160 100375 BPL 3$ 
011162 012700 000020 MOV 920,R0 ;SET UP TO CHECK ALL 16 LINES 
011166 005077 004322 CLR sSTART AT LINE O 
011172 005001 CLR Ri ;KEEP TRACK OF L 
011174 012705 177777 4$: MOV @-1,R5 ;(R5)=EXPECTED BYTE COUNT, 
sIF LINE R NOT = 5 
011200 005003 CLR R3 a cee coe aa ma 
3 = 
011202 017704 004316 MOV SOHBC .R4 ;CR4)=ACTUAL BYTE ACOUNT 
011206 017702 004310 MOV SOHBA , R2 ;(RS)=ACTUAL BUS ADDRESS 
011212 027727 004276 000005 CMP #5 :IF LINE BEING COMPARED IS LINE 5 
011220 001002 BNE 5$ 
011222 065005 CLR RS sEXPECTED BYTE COUNT=0 
011224 005203 INC R3 3 TED BUS ADDRESS = 1 
011226 020504 5$: CMP R5 ,R4 :IS BYTE COUNT CORRECT 
011230 001401 BEQ 6$ 
011232 HLT & sBYTE COUNT ERROR 
011232 104004 EMT 4 
611234 020302 6$: CMP R3 .R2 :IS BUS ADDRESS CORRECT 
011236 001401 BEQ 7$ 
011240 HLT 3 :B8US ADDRESS ERROR 
011240 104003 EMT 3 
011242 005277 004246 7$: INC SOHSCR ;PREPARE TO CHECK NEXT LINE 
011246 005201 INC Ri 
011250 005300 DEC RO sCONTINUVE IF ALL NOT DONE 
011252 001350 BNE 4$ 
011254 104400 8$: SCOPE ;CHECK FOR ITERATIONS, LOOP 
LINE =LINE+1 
000100 BITX=BITX+BITX 
011256 NPRTS2 \LINE, \BITX 


sNPR LOGIC TEST 

sSET BYTE COUNT ON ALL LINES TO 1 

;SET BAR BIT FOR LINE 6 

sVERIFY THAT BYTE COUNT FOR LINE 6 GOES TO 0 
sVERIFY THAT BUS ADDRESS FOR LINE 6 IS INCREMENTED 





‘A Ta Se A A arenes Oe 


-— 


011272 


011300 
011306 
011312 


011424 


011426 
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012767 
012767 
012767 


000037 
012777 


004767 


000340 
000010 
011424 


004076 


166512 


004206 


004202 





sVERIFY THAT BYTE COUNTS AND BUS ADDRESSES FOR ALL OTHER LINES 


sARE UNCHANGED 


TS \XN,10,8$ 
T36: MOV #340 ,PS 
MOV #10, ICOUNT 
MOV 08% ,ESCAPE 
.IF NB <> 
MOV @#,FREEZ1 
.ENDC 
XN=XNe1 
MOV #81T11,8DHSCR 
JSR PC CLEAR 
JSR PC ,LOAD 
MOV #100 , SOHBAR 
3$: TST @DHSCR 
BPL 3$ 
MOV @20,R0 
CLR 
CLR Ri 
4$: MOV #-1,R5 
CLR RS 
MGV SOHBC .R4 
MOV SOHBA, 
CMP @DHSCR , #6 
BNE $ 
CLR RS 
INC R3 
5$: CMP R5 .R4 
BEQ 6$ 
ALT 4 
EMT 4 
6$: CMP R3,R2 
BEQ 7$ 
HLT 3 
EMT 3 
7$: INC SDHSCR 
INC Ri 
DEC RO 
BNE 4$ 
8$: SCOPE 
LINE *LINE+1 
BITX=BITX+BITX 
NPRTS2 \LINE,\BITX 


sNPR LOGIC TEST 


SEQ 57 
sDISABLE ALL INTERRUPTS 
sSET UP FOR 10 ITERATIONS 
sSET UP TO ESCAPE TO NEXT TEST 
sSET UP TO LOOP WITH DATA ; 3 


sMASTER CLEAR INTERFACE 

310 SET ALL TBMT BITS 

sCLEAR ALL BYTE COUNT AND 

sBUS ADDRESS MEMORY LOCATIONS 

sSET ALL BYTE COUNT LOCATIONS TO -1 
;SET BAR BIT FOR LINE 6 

sWAIT FOR TRANSMITTER DONE 


sSET UP TO CHECK ALL 16 LINES 
sSTART AT LINE O 
sKEEP TRACK OF LINE NUMBER 


s(R4)=ACTUAL BYTE ACOUNT 
3CRS)=ACTUAL BUS ADDRESS 


sIF LINE BEING COMPARED IS LINE 6 


sEXPECTED SYTE COUNT=0 
sEXPECTED BUS ADDRESS 
3IS BYTE COUNT CORRECT 
s;BYTE COUNT ERROR 

3IS BUS ADDRESS CORRECT 
;BUS ADDRESS ERROR 

sPREPARE TO CHECK NEXT LINE 
sCONTINVE IF ALL NOT DONE 
;CHECK FOR ITERATIONS, LOOP 


=i 


sSET BYTE COUNT ON ALL —— TO 1 


sSET BAR BIT FOR 1. 


LINE 7 
;sVERIFY THAT BYTE COUNT FOR LINE 7 GOES TO 0 


sVERIFY THAT BUS 


ADDRESS FOR LINE 7 IS INC 


REMENTED 
sVERIFY THAT BYTE COUNTS AND BUS ADDRESSES FOR ALL OTHER LINES 


;ARE UNCHANGED 
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011426 
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011512 
011514 


011520 
011522 


011574 


011576 


011576 
011576 
011604 
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012767 
012767 
012767 


000040 
012777 
004767 


012767 
012767 


000340 
000010 
011574 


177777 


003776 
003770 
003756 


003726 


000340 166172 T40: MOV 
000010 003750 


004036 


004032 


000007 


TS \XN,.10,8$ 

T37: MOV 0340 ,PS 
MOV #10, ICOUNT 
MOV 08%, ESCAPE 

-IF NB <> 
MOV ¢,FREEZ1 


.ENDC 

XN=XNel 
MOV $BIT11,8DHSCR 
JSR PC ,CLEAR 
JSR PC ,LOAD 
MOV #200 , BOHBAR 

3$: TST HSC 
BPL 3$ 
MOV #20,R0 
CLR aD0HS 

| CLR Ri 

4$: MOV #-1,R5 
CLR R3 
MOV SDHBC ,R4 
MOV SDHBA, R2 
CMP SDHSCR , 7 
BNE 5$ 
CLR 
INC 3 

5$: CMP RS .R4 
BEQ § 
HLT 4 
EMT 4 

6$: CMP R3 ,.R2 
BEQ 7$ 
HLT 
EMT 3 

7$: INC SOHSCR 
INC Ri 
DEC RO 
BNE &$ 

8$: SCOPE 
LINE =LINE +i. 

BITX=BITX+BITX 

NPRTS2 \LINE, \BITX 


aT LOGIC TEST 


SEQ 58 
;DISABLE ALL INTERRUPTS 
;SET UP FOR 10 ITERATIONS 
;SET UP TO ESCAPE TO NEXT TEST 
sSET UP TO LOOP WITH DATA ; 3 


sMASTER CLEAR INTERFACE 

;TO0 SET ALL TBMT BITS 

sCLEAR ALL BYTE COUNT AND 

sBUS ADDRESS MEMORY LOCATIONS 

sSET ALL BYTE COUNT ‘<i TO -1 
sSET BAR BIT FOR ‘INE 7 

sWAIT FOR TRANSMITTER DONE 


sSET UP TO CHECK ALL 16 LINES 
sSTART AT LINE O 

sKEEP TRACK OF LINE NUMBER 
3CRS)*EXPECTED BYTE COUNT, 

;IF LINE NUMBER NOT = 7 
;(R3)=EXPECTED BUS ee 
sIF LINE NUMBER NOT = 
sCR4)=ACTUAL BYTE ACOUNT 
s(RS)=ACTUAL BUS ADDRESS 


;IF LINE BEING COMPARED IS LINE 7 


sEXPECTED BYTE COUNT=0 


sEXPECTED BUS ADDRESS = 1 


31S BYTE COUNT CORRECT 
;BYTE COUNT ERROR 

;IS BUS ADDRESS CORRECT 
:BUS ADDRESS ERROR 

;PREPARE TO CHECK NEXT LINE 
sCONTINUE IF ALL NOT DONE 
;CHECK FOR ITERATIONS, LOOP 


ET BYTE COUNT ON ALL LINES TO 1 


;SET BAR BIT FOR LINE 10 


sVERIFY THAT BYTE COUNT FOR LINE 10 GOES 70 0 


sVERIFY THAT BUS ADDRESS 


FOR LINE 10 IS INCREMENTED 


sVERIFY THAT BYTE COUNTS AND BUS ADDRESSES FOR ALL OTHER LINES 


sARE UNCHANGED 


TS \XN,10,8$ 
#340,PS 


MOV #10, ICOUNT 


sDISABLE ALL INTERRUPTS 
sSET UP FOR 10 ITERATIONS 
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011662 
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011672 
011676 


011746 
011746 
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012767 011744 903736 


000041 
012777 


012767 
012767 
012767 


004000 
003570 
003616 
000400 
003644 


000020 
003632 


177777 


003626 
003620 
003606 


003556 


000540 166022 141: 


000010 
012114 


003666 


003662 


000010 


003600 


MOV 08% , ESCAPE 
IF NB <> 
MOV @,FREEZ1i 


-ENDC 

XN=XNel1 
MOV #B81T11,8DHSCR 
JSR PC CLEAR 
JSR PC ,LOAD 
MOV #400 , 3DHBAR 

3%: TST SDHSCR 
BPL 3$ 
MOV #20,R0 
CLR 8DHSCR 
CLR Ri 

4$: MOV #-1,R5 
CLR R3 
MOV SDHBC ,R4 
MOV 8DHBA, R2 
CMP SDHSCR , #10 
BNE 
CLR 
INC RS 

5$: CMP RS .R4 
BEQ $ 
HLT 
EMT 

6$: CMP RS ,R2 
BEQ $ 
HLT 3 
EMT 3 

7$: INC SDHSCR 
INC Ri 
DEC RO 
BNE 4$ 

8$: SCOPE 
LINE =LINE+1i 

BITX=BITX+BITX 

NPRTS2 \LINE, \BITX 


sNPR LOGIC TEST 


SEQ 59 


;SET UP TO ESCAPE TO NEXT TEST 
;SET UP TO LOOP WITH DATA ; 3 


sMASTER CLEAR INTERFACE 

;TO SET ALL TBMT BITS 

sCLEAR ALL BYTE COUNT AND 

BUS ADDRESS MEMORY LOCATIONS 

sSET ALL BYTE COUNT LOCATIONS TO -i 
s;SET BAR BIT FOR LINE 10 

sWAIT FOR TRANSMITTER DONE 


sSET UP TO CHECK ALL 16 LINES 
sSTART AT LINE 0 

sKEEP TRACK OF LINE NUMBER 
sCRS5)*EXPECTED BYTE COUNT, 

;IF LINE NUMBER NOT = 10 
;CR3)=EXPECTED BUS ADDRESS, 
sIF LINE NUMBER NOT = 10 
sCR4)*ACTUAL BYTE ACOUNT 

(RS )=ACTUAL BUS ADDRESS 


sIF LINE BEING COMPARED IS LINE 10 


sEXPECTED BYTE COUNT=0 
sEXPECTED BUS ADDRESS = 1 
sIS BYTE COUNT CORRECT 
sBYTE COUNT ERROR 

sIS BUS ADDRESS CORRECT 
sBUS ADDRESS ERROR 

sPREPARE TO CHECK NEXT LINE 
sCONTINUE IF ALL NOT DONE 


sCHECK FOR ITERATIONS, LOOP 


;SET BYTE COUNT ON ALL — TO 1 


;SET BAR BIT FOR LINE 1 


sVERIFY THAT BYTE COUNT FOR LINE 11 GOES TO 0 


sVERIFY THAT BUS ADDRESS 


FOR LINE 11 IS INCREMENTE 


D 
sVERIFY THAT BYTE COUNTS AND BUS ADDRESSES FOR ALL OTHER LINES 


;ARE UNCHA 
TS \XN,10,8$% 
MOV $340 ,PS 
MOV #10, ICOUNT 
#8$ , ESCAPE 


MOV ¢,FREEZ1 


sDISABLE ALL INTERRUPTS 
sSET UP FOR 10 ITERATIONS 
;SET UP TO ESCAPE TO NEXT TEST 


sSET UP TO LOOP WITH DATA ; 3 
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000042 
012777 


012767 
612767 
012767 


000043 
012777 


004000 
003420 
003446 
001000 
003474 
000020 
003462 
177777 


003406 


003516 


003512 


000011 


003346 





SEQ 60 


sMASTER CLEAR INTERFACE 

310 SET ALL TBMT BITS 

sCLEAR ALL BYTE COUNT AND 

sBUS ADDRESS MEMORY LOCATIONS 

sSET ALL BYTE COUNT LOCATIONS TO -1 
sSET BAR BIT FOR LINE 11 

sWAIT FOR TRANSMITTER DONE 


;SET UP TO CHECK ALL 16 LINES 
sSTART AT LINE 0 

sKEEP TRACK OF LINE NUMBER 
s€R5)*EXPECTED BYTE COUNT, 

:IF LINE NUMBER NOT = 11 
s(R3)*EXPECTED BUS ADDRESS, 
sIF L NUMBER NOT = 11 

:CR4 = ACTUAL BYTE ACOUNT 
s(RS)*ACTUAL BUS ADDRESS 


;IF LINE BEING COMPARED IS LINE 11 


sEXPECTED BYTE COUNT=0 
sEXPECTED BUS ADDRESS = 1 
:IS BYTE COUNT CORRECT 
sBYTE COUNT ERROR 

IS BUS ADDRESS CORRECT 
sBUS ADDRESS ERROR 

sPREPARE TO CHECK NEXT LINE 
sCONTINUE IF ALL NOT DONE 


;CHECK FOR ITERATIONS, LOOP 


| FOR LINE 12 IS INCREMENTED 
pg Bie al le COUNTS AND BUS ADDRESSES FOR ALL OTHER LINES 


sDISABLE ALL INTERRUPTS 
sSET UP FOR 10 ITERATIONS 
sSET UP TO ESCAPE TO NEXT TEST 


:;SET UP TO LOOP WITH DATA ; 3 


-ENOC 
XN=XNel1 
MOV $B81T11,8DHSCR 
JSR PC .CLEAR 
JSR PC ,LOAD 
MOV #1000 , BDHBAR 
3$: TST @DHSCR 
BPL 3$ 
MOV #20,R0 
CLR 8DHSCR 
CLR Ri 
4$: MOV #-1,R5 
CLR R3 
MOV SDHBC .R4 
MOV SDHBA , R2 
CMP SDHSCR , #11 
BNE 
CLR 
INC R3 
5$: CMP RS ,R4 
BEQ 6$ 
HLT 4 
EMT 
63: CMP R3 ,R2 
BEQ é 
HLT 3 
EMT 3 
73; INC SDHSCR 
Ri 
DEC RO 
44 
8$: 
LINE =LINE+1i 
BITX=BITX+BITX 
NPRTS2 \LINE, \BITX 
;NPR LOGIC TEST 
;SET BYTE COUNT ON ALL LINES TO 1 
;SET BAR BIT FOR LINE i2 
;VERIFY THAT BYTE COUNT FOR LINE 12 GOES TO 9 
;VERIFY THAT BUS ADDRESS 
e 
TS \XN,10,8$% 
T42: MOV 0340 .PS 
MOV #10, ICOUNT 
08% , ESCAPE 
IF NB <> 
HOV @, FREEZ1 
-ENDC 
XN=XNo1 
#61T11.8DHSCR 


sMASTER CLEAR INTERFACE 
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012767 
012767 
012767 


000044 
012777 
004767 


177777 


003306 
003300 
003266 


003236 


004000 
003100 


003342 


000012 


165502 
003260 
003246 


003176 
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JSR PC CLEAR 
JSR PC LOAD 
NOV #2000, 8DHBAR 
3$: TST @DHSCR 
BPL 3$ 
MOV $20,R0 
CLR @DHSCR 
CLR Ri 
4$: MOV #-1,R5 
CLR R3 
MOV SDHBC ,R4 
MOV SDHBA , R2 
CMP @DHSCR, 012 
BNE 5$ 
CLR RS 
INC R3 
5$: CMP RS .R4 
BEQ 6$ 
HLT 4 
EMT 4 
6$: CMP R3,R2 
BEQ 7$ 
HLT 3 
EMT 3 
7$: INC SOHSCR 
INC Ri 
DEC RO 
BNE 43 
8$: SCOPE 
LINE =LINE+1i 
BITX=BITX+BITX 


NPRTS2 \LINE,\BITX 


sNPR LOGIC TEST 
sSET BYTE COUNT ON ALL LINES TO 1 


:SET BAR 


BIT FOR LINE 13 





SEQ 61 


;TO SET ALL TBMT BITS 

sCLEAR ALL BYTE COUNT AND 

;BUS ADDRESS MEMORY LOCATIONS 

;SET ALL BYTE COUNT LOCATIONS TO -1 
;SET BAR BIT FOR LINE 12 

;WAIT FOR TRANSMITTER DONE 


;SET UP TO CHECK ALL 16 LINES 
sSTART AT LINE 0 

sKEEP TRACK OF LINE NUMBER 
sCRS5)=EXPECTED BYTE COUNT, 

;IF LINE NUMBER NOT = 12 
;(R3)=EXPECTED BUS ADDRESS, 
;IF LINE NUMBER NOT = 12 
3(R4)=ACTUAL BYTE ACOUNT 
;CRS5)=ACTUAL BUS ADDRESS 


;IF LINE BEING COMPARED IS LINE 12 


sEXPECTED BYTE COUNT=0 
sEXPECTED BUS ADDRESS = 1 
sIS BYTE COUNT CORRECT 
sBYTE COUNT ERROR 

:IS BUS ADDRESS CORRECT 
sBUS ADDRESS ERROR 

sPREPARE TO CHECK NEXT LINE 
sCONTINUE IF ALL NOT CONE 


sCHECK FOR ITERATIONS, LOOP 


;VERIFY THAT BYTE COUNT FOR LINE 13 GOES TO 0 
sVERIFY THAT BUS ADDRESS FOR LINE 13 IS INCREMENTED 
sVERIFY THAT BYTE COUNTS AND BUS ADDRESSES FOR ALL OTHER LINES 


;ARE UNC 
TS \XN,10,8$ 
743: MOV $340 ,PS 
610, ICOUNT 
MOV 08% , ESCAPE 
-IF NB <> 
MGV @,FREEZI1 
-ENDC 
XN=XNeol 
MOV #68IT11,98DHSCR 
JSR PC CLEAR 





sDISABLE ALL INTERRUPTS 
sSET UP FOR 10 ITERATIONS 
sSET UP TO ESCAPE TO NEXT TEST 


sSET UP TO LOOP WITH DATA ; 3 


sMASTER CLEAR INTERFACE 
;TO SET ALL TBMT BITS 

sCLEAR ALL BYTE COUNT AND 
sBUS ADDRESS MEMORY LOCATIONS 


sient setipusaiciigy raiiiahasinniicaiamentil 
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012436 
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012460 
012466 
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012504 
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012705 
005003 
017704 


017702 
027727 
001002 


005005 
005203 


012767 
012767 
012767 


000045 
012777 


004767 
004767 


012777 
005777 


002126 
004000 
003154 


000020 
003142 


177777 


003066 


003172 


000013 


165332 
003110 
003076 


003026 


003022 


eS Sse 
SE® 62 


JSR PC ,LOAD ;SET ALL BYTE COUNT LOCATIONS TO -1 
MOV $4000, 8BDHBAR ;SET BAR BIT FOR LINE 13 
i ay ie Rp ;WAIT FOR TRANSMITTER DONE 
MCV #20,R0 ;SET UP TO CHECK ALL 16 LINES 
CLR SDHSCR ;START AT LINE 0 
CLR 1 ;sKEEP TRACK OF DINE NUMBER 
4$: MOV #-1,R5 ;(RS)*EXPECTED BYTE COUNT, 
;IF LINE NUMBER NOT = 13 
CLR R3 ;(R3)=EXPECTED BUS ADDRESS, 
;IF LINE NUMBER NOT = 13 
MOV SDHBC ,R4 ;(R4)=*ACTUAL BYTE ACOUNT 
MOV SDHBA, R2 ;CR5)=ACTUAL BUS ADDRESS 
Pa SDHSCR. 413 ;If LINE BEING COMPARED IS LINE 13 
CLR RS sEXPECTED BYTE COUNT=0 
INC R3 ;EXPECTED BUS ADDRESS = 1 
S$: Fo Sane :IS BYTE COUNT CORRECT 
“a ;BYTE COUNT ERROR 
6$: ad = aia :IS BUS ADDRESS CORRECT 
oH : ;BUS ADDRESS ERROR 
7$: a = ;PREPARE TO CHECK NEXT LINE 
oa “4 sCONTINUE IF ALL NOT DONE 
8$: SCOPE sCHECK FOR ITERATIONS, LOOP 
LINE =LINE+1 
BITX=BITX+BITX 
NPRTS2 \LINE,\BITX 
;NPR LOGIC TEST 
;SET BYTE COUNT ON ALL met TO i 
sSET BAR BIT FOR LINE i 
sVERIFY THAT BYTE COUNT FOR LINE 14 GOES TO 0 
;VERIFY THAT BUS ADDRESS FOR LINE 14 IS INCREMENTED 
;VERIFY THAT BYTE COUNTS AND BUS ADDRESSES FOR ALL OTHER LINES 
; UNCHANGED 
TS \XN,10,8$ 
744: MOV #340 ,PS sDISABLE ALL INTERRUPTS 
MOV #10, ICOUNT ;SET UP FOR 10 ITERATIONS 
MOV 68% ,ESCAPE ;SET UP TO ESCAPE TO NEXT TEST 
IF NB <> 
MOV #,FREEZ1 ;SET UP TO LOOP WITH DATA ; 3 
-ENOC 
XN=*XNel1 
MOV #61T11,80HSCR sMASTER CLEAR INTERFACE 
;T0 SET ALL TBMT BITS 
JSR PC CLEAR ;CLEAR ALL BYTE COUNT AND 
7B SS MEMORY LOCATIONS 
JSR PC .LOAD ;SET ALL BYTE COUNT ‘= TO -1 
MOV #10000 , 8DHBAR ;SET BAR BIT FOR LINE 1 
3$: TST SDHSCR sWAIT FOR TRANSMITTER DONE 























i. 
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7 —e 
° ;SET UP TO CHECK ALL 16 LINES 
005077 002772 CLR @DHSCR sSTART AT LINE 0 
005001 CLR Ri sKEEP TRACK OF LINE ER 
012705 177777 4%: MOV 6-1,R5 ;CRS)=EXPECTED BYTE COUNT, 
;IF LINE NUMBER NOT = 14 
005003 CLR R3 ;CRE)=EXPECTED BUS ADDRESS, 
sIF LINE NUMBER NOT = 14 
017704 002766 MOV SD0HSC ,R4 ;(R4)=ACTUAL BYTE ACOUNT 
017702 002760 MOV @DHBA,R2 ;(RS)=ACTUAL BUS ADDRESS 
027727 002746 900014 CMP @DHSCR , #14 ;IF LINE BEING COMPARED IS LINE 14 
001002 BNE 5$ 
CLR RS sEXPECTED BYTE COUNT=0 
005203 INC R3 sEXPECTED BUS ADDRESS = i 
020504 5%: CMP R5.R4 :IS BYTE COUNT CORRECT 
001401 BEQ 6% 
HLT & sBYTE COUNT ERROR 
104004 EMT 4 
020302 6$: CMP R3,R2 ;IS BUS ADDRESS CORRECT 
001401 BEQ 7$ 
HLT 3 ;BUS ADDRESS ERROR 
104003 EMT 3 
005277 002716 7%: INC SDHSCR sPREPARE TO CHECK NEXT LINE 
005201 INC Ri 
005300 DEC RO sCONTINUE IF ALL NOT DONE 
001350 BNE 43 
104400 8$: OPE ;CHECK FOR ITERATIONS, LOOP 
15 LINE =LINE+1 
020000 BITX=BITX+BITX 
NPRTS2 \LINE,\BITX 
sNPR LOGIC TEST 
sSET BYTE COUNT ON ALL LINES TO 1 
SSET BAR BIT FOR LINE 15 
; VERIFY net BYTE COUNT FOR LINE 15 GOES TO 0 
sVERIFY THAT BUS SS FOR LINE 15 IS INCREMENTED 
re THAT BYTE COUNTS AND BUS ADDRESSES FOR ALL OTHER LINES 
sARE UNCHANGED 
TS \XN,10,8¢ 
012767 000340 165162 145; MOV @340,.PS sDISABLE ALL INTERRUPTS 
012767 000010 002740 MOV #10, ICOUNT ;SET UP FOR 10 ITERATIONS 
012767 012754 002726 ol MOV 08% , ESCAPE ;SET UP TO ESCAPE TO NEXT TEST 
: <> 
oe MOV @, FREEZ1 sSET UP TO LOOP WITH DATA 5 8 
00046 XN®XNe 1 
012777 004000 002656 MOV #81IT11.8DHSCR sMASTER CLEAR INTERFACE 
sTO SET ALL TBMT BITS 
004767 002560 JSR PC CLEAR sCLEAR ALL BYTE COUNT AND 
sBUS ADDRESS MEMORY LOCATIONS 
004767 002606 JSR PC LOAD sSET ALL BYTE COUNT LOCATIONS TO -1 
012777 020000 002652 MOV #20000 , SDHBAR sSET BAR BIT FOR LINE 15 
005777 002634 3$; TST sWAIT FOR TRANSMITTER DONE 
100375 BPL 33 
012700 900020 MOV #20,R0 ;SET UP TO CHECK ALL 16 LINES 
005077 002622 CLR SSTART AT LINE 0 
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012767 
012767 
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000047 
012777 
004767 


002616 
002610 
002576 


002546 


000340 
000010 
013124 


000020 
002452 
177777 


000015 


165012 
002570 
002556 


002506 


002502 
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sKEEP TRACK CF L 
;(R5)=EXPECTED SYTE COUNT, 
;IF LINE NUMBER NOT = 15 
;CR3)-EXPECTED BUS ADDRESS, 
sIF LINE NUMBER NOT = 15 
;(R4*ACTUAL BYTE ACOUNT 
;CRS)=ACTUAL BUS ADDRESS 
;IF LINE BEING COMPARED IS LINE 15 


sEXPECTED BYTE COUNT=0 
sEXPECTED BUS ADDRESS = 1 
sIS BYTE COUNT CORRECT 
sBYTE COUNT ERROR 

sIS BUS ADDRESS CORRECT 
sBUS ADDRESS ERROR 

sPREPARE TO CHECK NEXT LINE 
sCONTINUE IF ALL NOT DONE 


sCHECK FOR ITERATIONS, LOOP 


sVERIFY THAT BYTE COUNTS AND BUS ADDRESSES FOR ALL OTHER LINES 
sARE UNCHANGED 


sDISABLE ALL INTERRUPTS 
sSET UP FOR 10 ITERATIONS 
sSET UP TO ESCAPE TO NEXT TEST 


sSET UP TO LOOP WITH DATA 


sMASTER CLEAR INTERFACE 


SEQ 64 





sWAIT FOR TRANSMITTER DONE 


sSET UP TO CHECK ALL 16 LINES 
sSTART AT LINE O 
sKEEP TRACK OF L 


CLR 
4%: MOV #-1,R5 
CLR R3 
MOV 
MOV 
CMP 
BNE 
CLR 
INC 
54%: CMP 
BEQ 
HLT 
EMT 
64: CMP 
BEQ 
HLT 
EMT 
7%: INC 
INC 
DEC RO 
BNE Ss 
84: sc 
LINE =LINE+1 
BITX=*BITX+BITX 
NPRTS2 \LINE, \BITX 
sNPR LOGIC TEST 
sSET BYTE COUNT ON ALL LINES TO 1 
sSET BAR BIT FOR LINE 16 
sVERIFY THAT BYTE COUNT FOR LINE 16 GOES TO 0 
sVERIFY THAT BUS ADDRESS FOR LINE 16 IS INCREMENTED 
TS \XN,10,88 
MOV #10, ICOUNT 
IF NB <> 
1] @,FREEZ1 
-ENDC 
XN®XNeol 
MOV #61711 ,8DHSCR 
JSR PC ,CLEAR 
JSR PC ,.LOAD 
MOV » @OHGAR 
33; TST 
BPL 38 
MOV #20,R0 
CLR SOHSCR 
CLR Ri 
4$; MOV #-1,R5 





LINE NUMBER 
s(R5)=EXPECTED BYTE COUNT, 
sIF LINE NUMBER NOT = 16 





CZOHC -CO 


013124 


013126 
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012767 
012767 
012767 


02446 
002440 
002426 


002376 


000016 





SEQ 65 









CLR R3 ;(R3)=EXPECTED BUS ADDRESS, 
sIF LINE NUMBER NOT = 16 
MOV SOHBC .R4 sCR4)=ACTUAL BYTE ACOUNT 
MOV GOHBA , R2 ;CRS)=*ACTUAL BUS ADDRESS 
a = CR,#16 sIF LINE BEING COMPARED IS LINE 16 
CLR RS sEXPECTED BYTE COUNT=0 
INC R3 sEXPECTED BUS ADDRESS = 1 
S$: pl -* toa 3IS BYTE COUNT CORRECT 
ae : sBYTE COUNT ERROR 
6%: = fee 3IS BUS ADDRESS CORRECT 
A : sBUS ADDRESS ERROR 
7$: Po “ CR sPREPARE TO CHECK NEXT LINE 
oe os sCONTINUVE IF ALL NOT DONE 
8: sCHECK FOR ITERATIONS, LOOP 
LINE =LINE+1 
BITX*BITX+BITX 
NPRTS2 \LINE,\BITX 
sNPR LOGIC TEST 
sSET BYTE COUNT ON ALL LINES TO 1 
sSET BAR BIT FOR LINE 17 
sVERIFY THAT BYTE COUNT FOR LINE 17 GOES TO 0 
sVERIFY THAT BUS ADDRESS FOR LINE 17 IS INCREMENTED 
sVERIFY THAT BYTE COUNTS AND BUS ADDRESSES FOR ALL OTHER LINES 
5 UNCHANGED 
TS \XN,10,88% 
147: MOV @340 PS sDISABLE INT 
#10, sSET UP FOR 10 ITERATIONS 
$, sSET UP TO ESCAPE TO NEXT TEST 
IF NB <> 
3SET UP TO LOOP WITH DATA 3 3 
-ENOC 
XN@XNeol 
MOV 
JSR 
LOCATIONS 
JSR BYTE COUNT LOCATIONS TO -1i 
MOV sSET BAR BIT FOR LINE 17 
38: My sWAIT FOR TRANSMITTER OONE 
MOV 3SET UP 
CLR sSTART AT 
CLR sKEEP TR 
43: MOV CRS 6 
sIF LINE 
CLR sCR3)°EXPECTED BUS ADORE 
sIF LINE NUMBER NOT = 17 
MOV GOHBC .R4 sCR4)*ACTUAL BYTE ACOUNT 











35 


38 
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017702 


002270 
027727 002256 000017 
001002 


002226 


MOV GOHBA,R2 
CMP GOHSCR , 017 
BNE 5$ 
CLR RS 
INC R3 
S$: CMP RS ,R4 
BEQ 6$ 
HLT 4 
EMT 4 
6$: CMP R3,R2 
BEQ 7$ 
HLT 3 
EMT 
7$ INC @OHSCR 
INC i 
DEC RO 
at 
8s: SCOPE 
LINE LINE +1 
BITX=BITX+BITX 
LINE =0 
XL INE =“_INE 
BITX=1 
XBIT=BITX 





s(RS)=ACTUAL BUS ADDRESS 
sIF LINE BEING COMPARED IS LINE 17 


sEXPECTED BYTE COUNT=0 
sEXPECTED BUS ADDRESS = 1 
sIS BYTE COUNT CORRECT 
sBYTE COUNT ERROR 

sIS BUS ADDRESS CORRECT 
sBUS ADDRESS ERROR 

sPREPARE TO CHECK NEXT LINE 
sCONTINUE IF ALL NOT DONE 


sCHECK FOR ITERATIONS, LOOP 
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012767 
012767 
012767 


000300 
000400 


017270 


002130 





sSILO LOGIC TEST (MAINTENANCE MODE ) 
sFORCE 1 CHARACTER INTO SILO USING SILO 


sMAINTENANCE BIT 


sVERIFY THAT CHARACTER AVAILABLE INTERRUPT OCCURS 
sVERIFY THAT CHARACTER AVAILABLE BIT IS 


sSET IN SYSTEM CONTROL REGISTER 


sVERIFY THAT SILO FILL REGISTER INCREMENTS TO 1 
sVERIFY THAT NEXT RECEIVED CHARACTER REGISTER 


sVALIO DATA BIT 


IS SET 
sVERIFY THAT CORRECT DATA PATTERN WAS RECEIVED 


TS \XN,10,58 
TSO: MOV @340,PS 
MOV #10, ICOUNT 
MOV @53$, ESCAPE 
-IF NB <> 
MOV @,FREEZ1 
-ENDC 
XN=XNel 
MOV @6IT11,8DHSCR 
MOV 62% , BOHRVEC 
MO @340 , BDHRL VL 
BIS @68IT15.98DHSSR 
MOV @BITO6 ,@DHSCR 
CLR PS 
MOV #1000,R0 
i$: DEC RO 
BNE is 
HLT 1 
EMT 
23: BIC #61715 .@DHSSR 
TSTs8 CR 
BMI 38 
HLT 5 
EMT 5 
38: MOV SOHSSR RS 
MOV SDHNRC, 
MOV #125252 ,R5 
CMP R54 
BEQ as 
HLT 6 
EMT 
4$ $ MOV R3,R4 
BIC #300 ,R4 
MOV $400 ,R5 
CMP RS .R4 
BEQ $ 
HLT 
EMT 7 
5$: MOV @STACK ,SP 
SCOPE 


s;SILO LOGIC TEST (MAINTENANCE MODE) 


SEQ 67 
sDISABLE ALL INTERRUPTS 
sSET UP FOR 10 ITERATIONS 
sSET UP TO ESCAPE TO NEXT TEST 
sSET UP TO LOOP WITH DATA ; 3 


sMASTER CLEAR INTERFACE 


sSET UP DELAY FOR SILO LOAD 
sDELAY FOR SILO LOAD 


sNO CHARACTER AVAILABLE INTERRUPT OCCURED 


sCLEAR SILO MAINTENANCE BIT 
sIS CHARACTER AVAILABLE BIT SET 


sCHARACTER AVAILABLE NOT. ERROR 


sREAD SILO STATUS REGISTER 
3CR4)*ACTUAL DATA IN NEXT 
sRECEIVED CHARACTER REGISTER 

(RS )=EXPECTED DATA IN 

sNEXT RECEIVED CHARACTER REGISTER 
3IS DATA IN SILO CORRECT 


:SILO DATA ERROR 

:;GET SILO STATUS REGISTER 
;CLEAR UNWANTED BITS 
3CRS)*EXPECTED DATA 

:IN SILO STATUS REGISTER 
;CHECK RESULTS 

sSILO STATUS ERROR 


sRESTORE STACK 
sCHECK FOR ITERATIONS, LOOP 








012767 
012767 
012767 


012767 


012767 
012767 
012767 


012767 


000053 
012701 
012777 
012705 
160105 


013516 


000001 
004000 


100000 
001000 


100000 


001744 
000300 


000100 


000340 
000001 
013774 


013652 








SEQ 68 
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sLOAD 63(DECIMAL ) CHARACTERS INTO SILO 
;VERIFY THAT SILO STATUS REGISTER COUNTS UP CORRECTLY 
TS \XN,1,5$,18 
164306 TS5S1: MOV $340 ,PS sDISABLE ALL INTERRUPTS 
002064 MOV #1, ICOUNT ;SET UP FOR 1 ITERATIONS 
002052 — ¥ 41 05%, ESCAPE ;SET UP TO ESCAPE TO NEXT TEST 
> <1$> 
002046 mae MOV 1$,FREEZ1 ;SET UP TD LOOP WITH DATA ; 3 
XN=XNel 
MOV #1,R1 ;SET UP TO LOAD SILO WITH 1 CHARACTER 
001770 18: MOV @BIT11,8DHSCR sMASTER CLEAR INTERFACE 
MOV R1,RO ;SAVE COUNT 
CLR R5 ;WILL BE COUNT OF CHARACTERS LOADED 
001774 23: BIS @6IT15,8DHSSR sLOAD A CHARACTER 
MOV #1000,R2 sSTALL FOR SILO 
33: DEC R2 
BNE 3$ 
601756 BIC BIT15,8DHSSR ;CLEAR LOAD BIT 
INC RS sUPDATE COUNT OF CHARACTERS LOADED 
DEC RO ;IF ALL CHARACTERS NOT LSADED 
BNE es ;LOAD ANOTHER 
MOV SOHSSR ,.R4 sREAD SILO STATUS REGISTER 
BIC #300 ,.R4 ;CLEAR UNWANTED BITS 
SWAB Ra :GET DATA INTO LOW BYTE 
CMP RS .R4 3; COMPARE 
BEQ 4$ 
oa L ;SILO STATUS ERROR 
43: SCOPE1 ;CHECK FOR LOOP WITH CURRENT 
sLOAD COUNT (R5) 
INC Ri :ADD 1 TO NUMBER OF CHARACTERS 
;T0 BE LOADED INTO SILO 
CMP #100 .R1 sCONTINVE UNTIL SILO IS FULL 
BNE i$ 
5$: SCOPE 
;SILO LOGIC TEST CMAINTENANCE MODE) 
sLOAD 64 (DECIMAL CHARACTERS INTO SILO 
;READ CHARACTERS OUT OF SILO 
;VERIFY THAT SILO STATUS REGISTER COUNTS DOWN CORRECTLY 
TS \XN,1,7$,1$ 
164152 TS2: MOV #340 PS ;DISABLE ALL INTERRUPTS 
001730 MOV $1, ICOUNT ;SET UP FOR 1 ITERATIONS 
001716 ~ 94 #73, ESCAPE sSET UP TO ESCAPE T9 NEXT TEST 
i <1$> 
001712 ener MOV #1$,FREEZ1 ;SET UP TO LOOP WITH DATA 3; 3 
XN=XNel 
MOV #1,R1 fi UP TO READ 1 CHARACTER 
001634 1%: MOV $6IT11,@DHSCR MASTER CLEAR INTERFACE 
MOV #100,R5 ;SILO STATUS COUNT SHOULD BE 
SUB R1,R5 ; LOOCOCTAL )-NUMBER 
OF CHARACTERS READ 
MOV #100 ,RO ;SET UP TO LOAD SILO 


012700 
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-— 


89 013672 
90 013676 


013704 
013706 
013710 
013716 
013720 
013722 
013724 
013730 
023734 
013736 
023740 
013742 
013744 
013750 


013754 
013756 
013760 
013760 
013762 
013764 


t 013766 


013772 
013774 
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001000 
100000 


100000 


001020 
001562 


001564 
000300 


000101 





001626 


001614 


2$: 
3$: 


4$: 
S$: 


6$: 


7$: 


#1000,R2 
‘ah caiamiaaas 


3$ 
#8IT15,@DHSSR 
RO 


SEQ 69 


;SET UP DELAY 
;LOAD 1 CHARACTER 
;DELAY 


sCLEAR SILO LOAD BIT 
sCONTINUE IF SILO NOT FULL 


;SET UP TO READ SILO 
sSET UP DELAY FOR SILO 
sREAD SILO 

;DELAY FOR SILO 


sUPDATE NUMBER OF CHARACTER S TO BE READ 
sCONTINUE READING 

sREAD SILO STATUS REGISER 

:CLEAR UNWANTED BITS 

;CRS)=EXPECTED SILO STATUS 

sCIN UPPER BYTE) 

s(R4)=ACTUAL SILO STATUS 

CIN UPPER BYTE) 

sCOMPARE EXPECTED AND RECEIVED DATA 


sSILO STATUS ERROR 
sCHECK FOR LOOP WITH SAME READ COUNT 


sUPDATE COUNT OF CHARACTERS TO BE READ 
sCONTINUE IF NOT DONE 





— 
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Sra OY awh pr 


013776 


014114 
014116 
014122 
014124 
014130 
014130 
014132 
014134 
014136 
014140 
014142 
014144 
014150 
014152 
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012767 
012767 
012767 


012767 


104010 


001404 


000100 


163772 


TS \XN,40,5$,1$ 
T53: V 


.IF NB 


-ENDC 
XN=XNel 


i$: 


2$: 


3$: 


4$;: 


10%: 


5$: 








sSILO LOGIC TEST (MAINTENANCE MODE) 

sSET SILO ALARI, LEVEL TO ALL VALUES 0-77 

sVERIFY THAT CHARACTER AVAILABLE FLAG 

sDOES NOT SET UNTIL SILO FILL LEVEL IS GREATER THAN 
;SILO ALARM LEVEL 


#340 ,PS 
#40, ICOUNT 
@5$, ESCAPE 


#1$,FREEZ1 


RS 
#81T11,@DHSCR 
RS ,@DHSSR 
RS,R1 


Ri 
@6IT15,8DHSSR 
#1000, RO 


72 
@BIT15 ,8DHSSR 


SEQ 7¢ 
s;DISABLE ALL INTERRUPTS 
;SET UP FOR 40 ITERATIONS 
sSET UP TO ESCAPE TO NEXT TEST 
;SET UP TO LOOP WITH DATA 3; 3 


sSTART AT ALARM LEVEL 0 
sMASTERCLEAR INTERFACE 
sSET ALARM LEVEL 

sSET FILL COUNT 

;ONE MORE THAN ALARM LEVEL 
sLOAD A CHARACTER 

sWAIT FOR SILO TO SETTLE 


sCLEAR MAINTENANCE BIT 
sUPDATE FILL COUNT 
a AVAILABLE FLAG SET 


; 
sCHARACTER AVAILALBE FLAG NOT SET 
sSHOULD IT BE 

sREAD SILO FILL LEVEL 

;SILO ALARM ERROR 


sNO CHARACTER AVAILABLE WHEN EXPECTED 


sREAD SILO FILL LEVEL 
:SILO ALARM ERROR 


s;CHECK FOR FREEZE AT CURRENT ALARM LEVEL 


;GO TO NEXT ALARM LEVEL 
sCONTINUE IF NOT DONE 


s;CHECK FOR ITERATIONS. LOOP 
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1 
2 014154 


—— 
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016767 


013701 
001405 
000005 


004711 
40 


164602 


001330 


165100 


164560 


164516 
1645C6 
164476 


001244 


.EOP */BEGIN/ 
;END OF PASS 
;TYPE NAME OF TEST 
;UPDATE PASS COUNT 
;CHECK FOR EXIT TO ACT-1i1 
sRESTART TEST 
EOP: TYPE 
MEPASS 
CLR LAST 
CLR ERRFLG 
INC PASCNT 
TST LIGHTS 
BNE es 
TYPE 
PASTXT 
TASC 
PASARG 
3$ 
2$: 
= MOV PASCNT ,LIGHTS 
MOV 8042 ,R1 
BEQ RESTRT 
RESET 
LOGI : JSR PC ,CRL) 
NOP 
NOP 
NOP 
RESTRT: JMP BEGIN 
PASARG: .WORD i 
-BYTE 6,2 
-¥ORD $$ PASCNT 
. SCOPE 
sCHECK FOR LOOP 
:CHECK FOR ITERATION 
SCOPER: BIT @SW10, @SWR 
BNE As 
1$: BIT @SW14,3SWR 
BNE 3$ 
BIT #SWil,@SWR 
BNE 2$ 
INC LPCNT 
CMP LPCNT, ICOUNT 
BNE 33 
2s: CLR 
CLR ERRFLG 
MOV (SP) .RETRN 
RTI 
3$ MOV RETRN, (SP) 
RTI 
4s TST ERRFLG 
BEQ i$ 





whbde 
SION 


be ee 


SEQ 71 


sTYPE NAME OF TEST 


s;CLEAR LAST ERROR PC 
sCLEAR ERROR FLAG 
sUPDATE PASS COUNT 

; ARE WE USING LIGHTS? 
; BRANCH IF WE ARE 

; TYPE PASCOUNT MESSAGE 


; PRINT PASSCOUNT 
; CONTINUE 
sDISPLAY PASS COUNT 


sCHECK FOR ACT-11 OR DOP 
sIF NOT, CONTINUE TESTING 


> £2 SUUGAS 


; PARAMETERS TO PRINT PASSCOUNT 
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-— 


014352 


4 014354 


014372 


014372 


014570 





ec EN 
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000762 


001055 


016716 


. SCOP1 


001000 164416 SCOPIR: 


001170 


020000 
001204 
001176 
001126 


000002 


177001 
016352 
000040 


000010 


164240 
000002 
000772 


002000 
000762 


164400 


001036 


164212 


1$: 
-ERROR 


ERRORS : 


i$: 


TYPMSG: 


ITER: 





BR 2$ 


s;CHECK FOR FREEZE ON CURRENT DATA 


BIT @SWO9, ASWR 
BEQ i$ 
MOV FREEZ1,(SP) 
RTI 
s;ERROR HANDLER 
BIT @SW13, @SWR 
BNE HALTS 
CMP (SP) ,LAST 
BEQ 1$ 
MOV (SP) ,LAST 
CLR ERRFLG 
SAVOSP 
MOV CSP),R5 
SUB #2 ,R5 
MOV CRS) ,.R4 
ASL R4 
ASL R4 
BIC #177001,R4 
ADO PERRTAB ,R4 
MOV CR4)+, ERRMSG 
MOV CR4) ,DATABP 
TST ERRFLG 
BEQ TYPMSG 
TST DATABP 
BNE TYPDAT 
Lan 
OCTASC 
ERT 

V #1, ERRFLG 
— 
TST DATABP 
BEQ RESREG 
TYPE 

F 

ee 
RESOS 
TST BSWR 
BPL EXITER 
PUSHRO 
MOV 2(SP),RO 
HALT 
POPRO 
INC ERRCNT 
BIT #SW10, 8SWR 
BEQ 1$ 
MOV ESCAPE , (SP) 
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| 
= 


014574 


9 014772 
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000002 
000001 


006 
015604 


002 


000002 
000000 


177001 
016272 
000000 


000000 
000602 
000636 


000624 


016314 


000542 


i$: 
ERTABO: 


. TRPSRV 


TRPSRV: 


TRPOK: 


. TYPER 


TYPER: 
1$: 


2s: 


- INSTRG 


INSTRG: 
INSTRI1: 
MSG: 


i$: 


2$: 


INSTRE : 


INSTR2: 
.PARAMS 





SEQ 73 
RTI 
1 
-BYTE 6,2 
SAVPC 
sTRAP DISPATCH SERVICE 
sARGUMENT OF TRAP IS EXTRACTED 
sAND USED AS OFFSET TO OBTAIN POINTER ; 3 
TO SELECTED SUBROUTINE 
MOV CSP),-CSP) sGET PC OF RETURN 
SUB #2 ,(SP) ;=PC OF TRAP 
MOV SC SP), (SP) ;sGET TRP 
ASL (SP) sMULTIPLY TRAP ARG BY 2 
BIC #177001, (SP) sCLEAR UNWANTED BITS 
ADD @TRPTAB, CSP) sPOINTER TO SUBROUTINE ADORESS 
MOV aC SP), CSP) sSUBROUTINE ADDRESS 
JMP OC SP )-+ sGO TO SUBROUTINE 


sTELETYPE OUTPUT ROUTINE 


MOV 8(SP),RS 

ADD @2 (SP) 

TSTB ag 

TSTB CRS) 

BNE 3 

RTI 

MOVB CRS)+, @TPOBR 
BR is 


sASCII STRING INPUT ROUTINE 


MOV aC SP),MSG 

ADD #2 ,(SP) 

0 

MOV GINBUF ,R4 

MOV #7 ,R3 

TST8 — 

MOVB GTKDBR , (R4) 

BICB #200 ,(R4) 
(R4)+, 015 

BEQ INSTR2 

MOVB STKDBR .@TPOBR 

TSTB @TPCSR 

BPL 23 

DEC m3 

BNE i$ 

TYPE 

MQM 

BR INSTRi 

RTI 
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— 


10 


014772 
014774 
O1 


015102 
015106 
015110 
015114 
015116 
015122 


015124 
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000000 
015155 


017601 
062716 


016314 
000015 


000060 
000067 
000060 
000015 


000042 
000032 
000032 


000022 


000002 
000013 


sCONVERT ASCII STRING TO OCTAL 


sSTORE NUMBER AT SPECIFIED ADDRESS 


sCONVERT OCTAL NUMBER TO ASCII AND OUTPUT TO TELEPRINTER 


PARAMS: MOV (SP),R5 
MOV C(R5)+,LOLIM 
MOV (R5)+,HILIM 
MOV CRS)+,DEVADR 
MOVB (R5)+,LOBITS 
MOVB CR5)+,ADRCNT 
MOV RS .CSP) 
PARAM1: CLR 
MOV @INBUF ,R4 
#15,(R4) 
BEQ PARERR 
1$: CMPB CR4) , #60 
BLT RERR 
CMPB CR4) , 067 
BGT PARERR 
BICB #60, (R4) 
BISB CR4)+,R5 
#15, (R4) 
BEQ LIMITS 
ASL RS 
ASL R5 
ASL RS 
BR is 
PARERR: INSTER 
PARAML 
LIMITS: CMP RS ,HILIM 
BHI PARERR 
CMP R5,LOLIM 
BLO RR 
BITB LOBITS.RS 
BNE RR 
MOV DEVADR ,R4 
i$: MOV RS, CR4)+ 
ADD RS 
DECB ADRCNT 
BNE 1$ 
RTI 
LOLIM: 90 
HILIM: 0 
DEVADR: 0 
LOBITS: 0 
ADRCNT=LOBITS+1 
.OCTASC 
OCTASN: MOV aCSP),R1 
ADD #2,(SP) 
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il 


i2 


015324 


015526 
015330 


015330 


015370 


015370 
015374 
015400 
015404 
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012167 


016667 


010567 


016703 


177770 
000260 


000004 


000246 


sSAVE PC OF TEST THAT FAILED AND RO-RS 


MOV (R1)+,WROCNT 
1$: MOVE €R1)+, CHRCNT 
MOVB (R1)+,SPACNT 
MOV @(R1)+ ,BINWRD 
2s: MOV BI ~R4 
MOVB CHRCNT .RS 
MOV STEMP RO 
3%: MOV 4,R3 
BIC $177770,R3 
ADD 60,R3 
MOVB R3,.CRO)+ 
ASR R4 
ASR R4 
ASR R4 
DEC RS 
BNE 3$ 
MOV OMDATA Kz 
43: MOVB -€80).¢(R3)-+ 
DECB NT 
BNE 4$ 
TSTB SPACNT 
BEQ 6$ 
5$: MOVB #240 ,CR3)+ 
DECB — 
6$: CLRB CR3) 
TYPE 
MDATA 
Cc WROCNT 
BNE is 
RTI 
WROCNT: O 
CHRCNT: O 
SPACNT =CHRCNT+1 
BINWRD: 
. SAVREG 
SVOSP: MOV 4(SP), SAVPC 
:SAVE RO-RS 
SVOS: MOV R5.,SAVRS 
MOV R4.SAVR4 
MOV R3,SAVR3 
MOV R2,SAVR2 
MOV R1,SAVR1i 
MOV »SAVRO 
RTI 
.RESREG 
sRESTORE RO-RS 
RSOS: MOV SAVRC,RO 
MOV SAVR1,R1 
MOV SAVR2 ,R2 
MOV SAVR3S,R3 








SEQ 75 





SEQ 76 | 
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015410 016704 000162 MOV SAVR4 ,R4 
015414 016705 000160 MOV SAVRS RS 
015420 000002 RTI 
13 015422 CLRBCA 
sCLEAR BYTE COUNT AND BUS ADDRESS MEMORIES 
015422 012700 000020 CLEAR: MOV #20,R0 sSET UPT TO CLEAR 16 (DECIMAL) LOCATIONS 
015426 005077 000062 CLR SDHSCR sSTART AT LOCATION 0 
015432 005077 0060066 1s: CLR SOHBC sCLEAR BYTE COUNT 
015436 005077 000060 CLR SDHBA ;CLEAR BUS ADDRESS 
015442 005277 000046 INC @DHSCR sADVANCE LINE NUMBER 
015446 005300 DEC RO sCONTINUE IF NOT DONE 
015450 001370 BNE i$ 
015452 000207 RTS PC sRETURN 
14 015454 LOBC 
sLOAD ALL BYTE COUNT MEMORY LOCATIONS WITH -1 
015454 012700 000020 LOAD: MOV #20,RO0 sSET UP TO LOAD 16 (DECIMAL) LOCATIONS 
015460 005077 000030 CLR CR sSTART WITH LINE 0 
15464 012777 177777 000032 2¢: MOV ¢-1,8DHBC sSET BYTE COUNT TO -1 
015472 5277 000016 INC CR sADVANCE LINE NUMBER 
015476 005300 DEC RO sCONTINUE IF NOT DONE 
015500 001371 BNE 23 
15 013804 i POINT + /DHSCR, DHINRC, DHLPR , DHBA ,OHBC, DHBAR. DNBCR OASSR -DHSCR-DHRY 
: RVEC ,OMRLVL , OHTVEC ,OHTLVL/ 
sINDIRECT POINTERS ; 3 ; 
015504 177560 TKCSR: 177560 
15506 177562 TKOBR: 177562 
015510 177564 TPCSR: 177564 
015512 177566 TPOBR: 177566 
mes  IRP A <DHSCR ,DHNRC ,DHLPR ,DHBA, DHBC ,DHBAR ,OHBCR,DHSSR,DHSLR ,DHRVEC, DHRLVL ,OHTVEC, OH 
0 
015514 000000 0 
015516 000000 0 
015520 000000 0 
015522 000000 0 
015524 000000 0 
015526 900000 0 
015530 000000 0 
015532 000000 0 
015534 000000 0 
015336 000000 : 0 
iS 000000 Q 
01 000000 0 
015 000000 : 0 
16 015546 +/HCORE/ 
sPROGRAM VARIABLES 
015546 000000 ERRFLG: 0 sERROR FLAG 
015550 000000 PA : 0 sPASS COUNT 
015552 000000 : © sERROR COUNT 
015554 000000 RETRN: 0 sSCOPE RETURN ADDRESS FOR TEST LOOPING 
015556 000000 ESCAPE: 0 sADDRESS FOR ERROR ESCAPE 





‘- 





(ar nen TL LE TS A 
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177722 


015616 
000340 
017270 
000406 
000402 


177600 
177640 


162154 


162122 
162066 


RESTAR: 





sDATA LOOPING RETURN ADDRESS 
sITERATION COUNT FOR TEST IN PROGRESS 
sNUMBER OF ITERATIONS THIS TEST 


sRS SAVE AREA 
sSTACK POINTER SAVE AREA 
sCALLING ROUTINE SAVE AREA 
;PROGRAM INITIALIZATION FLAG 
sPROGRAM START FLAG 
sLAST ERROR PC 

<HCORE > 


o oprocoocoececoeoecoo 


sENTER HERE ON POWER FAILURE 


MOV »- CSP) sSAVE RO-RS ON PROCESSOR STACK 
MOV R1,-(SP) 

MOV R2,-C(SP) 

MOV R3,-CSP) 

MOV R4,-CSP) 

MOV » - CSP 

MOV 24,-CSP) 

MOV SP ,SAVSP sSAVE STACK POINTER 

MOV @RESTART ,24 sSET UP FOR POWER UP TRAP 
_ sHALT ON POWER DOWN NORMAL 


sPROCESSOR WILL TRAP HERE WHEN POWER IS RESTORED 


MOV SAVSP , SP sRESTORE STACK POINTER 
MOV (SP)+,R5 sRESTORE RO-RS 

MOV CSP)+,R4 

MOV (SP)+,R3 

MOV do, R2 

MOV (SP)+,.R1 

MOV do,RO 


sSET UP FOR POWER FAILURE 





SEQ 77 








000177 177576 
000001 
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JP 
PFTAB: i 






RETRN 
.MSG */DH1i1 TRANSMITTER AND RECEIVER LOGIC TEST/,t/CZDHC-CO/ 


MTITLE: .ASCIZ 





MVECTO: .ASCIZ 


MREGAD: .ASCIZ 


MQM: -ASCIZ 


MCRLF: .ASCIZ 
MPFAIL: .ASCIZ 





€15><12><12>/DH11 TRANSMITTER AND RECEIVER LOGIC TEST /<15><12> 


<15><12>/VECTOR ADDRESS-/ 


<15><12>/CONTROL REGISTER ADDRESS-/ 


/ POWER FAILURE, PROGRAM RESTART AT TEST IN PROGRESS/ 


20 


21 


016314 


016314 


016326 


016340 
016352 


29 016370 
30 916372 





123 





MEPASS: 


PASTXT: 





-ASCIZ <15><12>/CZDHC -CO/ 


-ASCIZ <15><12>/PASS COUNT = / 


-ASCIZ <15><12>/R/ 
-ASCIZ ¢15><12>/TEST PC-/ 


TABLE OF POINTERS FOR TRAP DECODING 


sBUFFERS FOR INPUT-OUTPUT 
0 
0 


sTABLE OF POINTERS TO ERROR MESSAGES AND DATA 





SEQ 79 


CZ0HC -CO 


41 


42 


43 


45 


016374 








EN EIS SOA TE SIT TET ET SS TS aA ne 
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105 EMO: 


EM1: 


123 EMS: 


124 EM4: 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCII 


-ASCIZ 


-ASCIT 


/UNEXPECTED INTERRUPT/ 


<15><12>/CONTROL REGISTER CONTENTS/ 


/NO INTERRUPT/ 


‘TRANSMITTER DONE NOT SET/ 


/BUS ADDRESS ERROR/ 


¢€15><12>/EXxP REC/ 


/BYTE COUNT ERROR/ 





SEQ 80 


“_— = 
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47 016623 


46 


ay 


50 


Si 


S2 


53 








LE ALOT KIT PE ES CITE BL IR OTE RL NRT 
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000002 
006 


002 





EMS: 


EM6: 


EM7: 


EM10: 


-EVEN 


OTi: 


-BYTE 


»ASCIZ 


.ASCIZ 


-ASCIT 


-ASCIZ 


-ASCIT 


-ASCIZ 


-ASCII 


-ASCIZ 


<15><12>/ExP REC/ 


/CHARACTER AVAILABLE NOT SET/ 


/SILO DATA ERROR/ 


<15><12>/EXP REC/ 


/SILO STATUS ERROR/ 


<15><12>/EXP REC/ 


/SILO ALARM ERROR/ 


€15><12>/ALARM LEVEL FILL LEVEL/ 


sDATA TABLES FOR ERROR OUTPUT 


2 
6.2 


EE RA ERLE GREE SIRS CANES OAR, 
RON EEY SEP le OF TTS RIE, SLE RT TETAS LEED LE ESOL LDL ELTL LLL ELLA ISLA AS A ELLE ELLY, 





SEQ 81 


~— <« 
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61 017050 
62 017052 
63 017054 
64 017056 
65 017060 
66 017062 
67 017064 
68 017066 
69 017070 

017070 
70 








rE 
SEQ 82 
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002 
015574 


000000 
000001 





SAVRS 
000 BYTE 6,0 
SAVR4 
OTe: 2 
014 BYTE 2,14 
SAVRS 
000 BYTE 2,0 
SAVR3 
-ENDCOD 
ENDCOD: 0 
.END 
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SYMBOL TABLE 
ADRCNT= 015155 EMS 016544 MREGAD 016067 SIZE 001162 
BEGIN 001346 EM4 016603 MSG 014704 SPACNT= 015325 
BINWRD 015326 EMS 016641 MTITLE 015766 STACK = 017270 
BITX = 000001 016675 MTSTPC 016256 START 001004 
BITOO = 000001 EM7 016732 MVECTO 016045 STFLG 015610 
BITO1 = ENDCOD 017070 = 000001 SV05 015336 
BITO2 = 000004 014154 OCTASC= 104402 SVOSP 015330 
BITOS = 000010 ERRCNT 015552 OCTASN 015156 S 001000 
BITO4 = 000020 ERRFLG 015546 PARAM = 104405 SWOO = 000001 
BITOS = 000040 ERRMSG 014512 PARAMS 014772 SWO1 = 000002 
BITO6 = 000100 ERRORS 014372 PARAM1 015022 SWO2 = 000004 
BITO7 = ERRTAB 016352 PARERR 015076 SWO3 = 000010 
BITO8 = 000400 ERTABO 014576 PASARG 014246 SWO4 = 000020 
BITO9 = 001000 ESCAPE 015556 PASCNT 015550 SWOS = 
BIT10 = 002000 EXITER 014554 PASTXT 016232 SWO6 = 000100 
BIT1i = FREEZ1 015560 PFAIL 015616 = 000400 
BIT12 = 010000 HALTS 014534 PFTAB 015756 SWO9 = 001000 
BIT13 = 020000 HCORE 015614 POPRO = 012600 SW10 = 002000 
BIT14 = 040000 HILIM 015150 POPiSP= 005726 SWil = 
BITiS = ICOUNT 015562 POP2SP= 02 SWi2 = 010000 
NT 015324 INBUF 016314 = 177776 SWi3 = 020000 
CLEAR 015422 INIFLG 015606 PUSHRO= 010046 SW1i4 = 040000 
DATABP 014530 INSTER= 104404 PUSH1S= 005746 SWi5 = 100000 
DEVADR 015152 INSTR = 104403 PUSH2S= 02 016326 
DHBA 015522 INSTRE 014762 014532 TKCSR 015504 
DHBAR 015526 INSTRG 014670 RESTAR 015654 TKOBR 0 
DHBC 015524 INSTR1 014702 RESTRT 014242 TPCSR 015510 
DHBCR 015530 INSTR2 014770 RESOS = 104407 TPOBR 015512 
DHLPR 015520 LAST 015612 RE 015554 TRPOK 014616 
DHNRC 015516 LIGHTS 001002 015370 TRPSRV 
DHRLVL 015540 LIMITS 015102 SAVPC 015604 16272 
015536 LINE = 015566 TYPDAT 014514 
DHSCR 015514 LO 015454 SAVR1 015570 od 1 
DHSLR 015534 LOBITS 015154 SA 015572 TYPER 014636 
DHSSR 015532 LOGICA 014232 SAVRS 015574 TYPMSG 014472 
DHTLVL 015544 LOLIM 015146 SAVR4 015576 Ti 001440 
DHTVEC 015542 LPCNT 015564 SAVRS 01 T10 003136 
DT1i 017044 MCRLF 016127 SAVSP 015602 Til 003374 
DT2 017056 MDATA 0 SAVOSP= 104406 Ti2 003632 
EMO 016416 MEPASS 016217 SCOPE = 104400 Ti3 004070 
EM1 016476 MPFAIL 016132 SCOPER 0 T14 
EM10 016771 MQH 016123 SCOPE1= 104410 TiS 004564 
016513 MR 016252 SCOPIR 014354 T16 005022 





- ABS. 017072 000 
000000 001 
ERRORS DETECTED: 0 
VIRTUAL MEMORY USED: 20224 WORDS aot” PAGES) 


DYNAMIC MEMORY AVAILABLE FOR 71 P 
CZDHCC .BIN, CZDHCC .. SEQ=CZDHCC .DOC ,DHMACA. MAC, CZDHCC .P11 








